home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-05-21 | 13.4 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 14 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6a 75 73 74 69 6e 62 |piled by| justinb|
|00000020| 40 65 62 6f 6e 79 2e 63 | 72 61 79 2e 63 6f 6d 20 |@ebony.c|ray.com |
|00000030| 6f 6e 20 4d 6f 6e 20 4d | 61 72 20 20 39 20 31 32 |on Mon M|ar 9 12|
|00000040| 3a 34 35 3a 33 39 20 31 | 39 39 38 0a 3b 3b 3b 20 |:45:39 1|998.;;; |
|00000050| 66 72 6f 6d 20 66 69 6c | 65 20 2f 68 6f 6d 65 2f |from fil|e /home/|
|00000060| 61 73 70 65 6e 30 37 2f | 6a 75 73 74 69 6e 62 2f |aspen07/|justinb/|
|00000070| 72 6f 6f 74 73 2f 66 72 | 65 65 77 61 72 65 2f 78 |roots/fr|eeware/x|
|00000080| 65 6d 61 63 73 2f 32 30 | 2e 33 2f 78 65 6d 61 63 |emacs/20|.3/xemac|
|00000090| 73 2d 32 30 2e 33 2f 6c | 69 73 70 2f 76 6d 2f 76 |s-20.3/l|isp/vm/v|
|000000a0| 6d 2d 75 6e 64 6f 2e 65 | 6c 0a 3b 3b 3b 20 65 6d |m-undo.e|l.;;; em|
|000000b0| 61 63 73 20 76 65 72 73 | 69 6f 6e 20 32 30 2e 34 |acs vers|ion 20.4|
|000000c0| 20 22 45 6d 65 72 61 6c | 64 22 20 58 45 6d 61 63 | "Emeral|d" XEmac|
|000000d0| 73 20 20 4c 75 63 69 64 | 2e 0a 3b 3b 3b 20 62 79 |s Lucid|..;;; by|
|000000e0| 74 65 63 6f 6d 70 20 76 | 65 72 73 69 6f 6e 20 32 |tecomp v|ersion 2|
|000000f0| 2e 32 35 20 58 45 6d 61 | 63 73 3b 20 32 32 2d 4d |.25 XEma|cs; 22-M|
|00000100| 61 72 2d 39 36 2e 0a 3b | 3b 3b 20 6f 70 74 69 6d |ar-96..;|;; optim|
|00000110| 69 7a 61 74 69 6f 6e 20 | 69 73 20 6f 6e 2e 0a 3b |ization |is on..;|
|00000120| 3b 3b 20 74 68 69 73 20 | 66 69 6c 65 20 75 73 65 |;; this |file use|
|00000130| 73 20 6f 70 63 6f 64 65 | 73 20 77 68 69 63 68 20 |s opcode|s which |
|00000140| 64 6f 20 6e 6f 74 20 65 | 78 69 73 74 20 69 6e 20 |do not e|xist in |
|00000150| 45 6d 61 63 73 20 31 39 | 2e 0a 0a 28 69 66 20 28 |Emacs 19|...(if (|
|00000160| 61 6e 64 20 28 62 6f 75 | 6e 64 70 20 27 65 6d 61 |and (bou|ndp 'ema|
|00000170| 63 73 2d 76 65 72 73 69 | 6f 6e 29 0a 09 20 28 6f |cs-versi|on).. (o|
|00000180| 72 20 28 61 6e 64 20 28 | 62 6f 75 6e 64 70 20 27 |r (and (|boundp '|
|00000190| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 20 |epoch::v|ersion) |
|000001a0| 65 70 6f 63 68 3a 3a 76 | 65 72 73 69 6f 6e 29 0a |epoch::v|ersion).|
|000001b0| 09 20 20 20 20 20 28 73 | 74 72 69 6e 67 2d 6c 65 |. (s|tring-le|
|000001c0| 73 73 70 20 65 6d 61 63 | 73 2d 76 65 72 73 69 6f |ssp emac|s-versio|
|000001d0| 6e 20 22 32 30 22 29 29 | 29 0a 20 20 20 20 28 65 |n "20"))|). (e|
|000001e0| 72 72 6f 72 20 22 60 76 | 6d 2d 75 6e 64 6f 2e 65 |rror "`v|m-undo.e|
|000001f0| 6c 27 20 77 61 73 20 63 | 6f 6d 70 69 6c 65 64 20 |l' was c|ompiled |
|00000200| 66 6f 72 20 45 6d 61 63 | 73 20 32 30 22 29 29 0a |for Emac|s 20")).|
|00000210| 0a 28 6f 72 20 28 62 6f | 75 6e 64 70 20 27 63 75 |.(or (bo|undp 'cu|
|00000220| 72 72 65 6e 74 2d 6c 6f | 61 64 2d 6c 69 73 74 29 |rrent-lo|ad-list)|
|00000230| 20 28 73 65 74 71 20 63 | 75 72 72 65 6e 74 2d 6c | (setq c|urrent-l|
|00000240| 6f 61 64 2d 6c 69 73 74 | 20 6e 69 6c 29 29 0a 0a |oad-list| nil))..|
|00000250| 0a 28 70 72 6f 76 69 64 | 65 20 27 76 6d 2d 75 6e |.(provid|e 'vm-un|
|00000260| 64 6f 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |do).(def|alias 'v|
|00000270| 6d 2d 73 65 74 2d 62 75 | 66 66 65 72 2d 6d 6f 64 |m-set-bu|ffer-mod|
|00000280| 69 66 69 65 64 2d 70 20 | 23 5b 28 66 6c 61 67 20 |ified-p |#[(flag |
|00000290| 26 6f 70 74 69 6f 6e 61 | 6c 20 62 75 66 66 65 72 |&optiona|l buffer|
|000002a0| 29 20 22 8a 08 ab 83 08 | 71 88 c1 5c 6e 21 88 0b |) ".....|q..\n!..|
|000002b0| 54 13 c4 c5 20 0e 06 5c | 22 88 5c 6e 3f ad 84 c7 |T... ..\|".\n?...|
|000002c0| 89 16 08 29 87 22 20 5b | 62 75 66 66 65 72 20 73 |...)." [|buffer s|
|000002d0| 65 74 2d 62 75 66 66 65 | 72 2d 6d 6f 64 69 66 69 |et-buffe|r-modifi|
|000002e0| 65 64 2d 70 20 66 6c 61 | 67 20 76 6d 2d 6d 6f 64 |ed-p fla|g vm-mod|
|000002f0| 69 66 69 63 61 74 69 6f | 6e 2d 63 6f 75 6e 74 65 |ificatio|n-counte|
|00000300| 72 20 69 6e 74 65 72 6e | 20 62 75 66 66 65 72 2d |r intern| buffer-|
|00000310| 6e 61 6d 65 20 76 6d 2d | 62 75 66 66 65 72 73 2d |name vm-|buffers-|
|00000320| 6e 65 65 64 69 6e 67 2d | 64 69 73 70 6c 61 79 2d |needing-|display-|
|00000330| 75 70 64 61 74 65 20 30 | 20 76 6d 2d 6d 65 73 73 |update 0| vm-mess|
|00000340| 61 67 65 73 2d 6e 6f 74 | 2d 6f 6e 2d 64 69 73 6b |ages-not|-on-disk|
|00000350| 5d 20 33 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 3]).(d|efalias |
|00000360| 27 76 6d 2d 75 6e 64 6f | 2d 62 6f 75 6e 64 61 72 |'vm-undo|-boundar|
|00000370| 79 20 23 5b 6e 69 6c 20 | 22 08 40 ad 85 c1 08 42 |y #[nil |".@....B|
|00000380| 89 10 87 22 20 5b 76 6d | 2d 75 6e 64 6f 2d 72 65 |..." [vm|-undo-re|
|00000390| 63 6f 72 64 2d 6c 69 73 | 74 20 6e 69 6c 5d 20 32 |cord-lis|t nil] 2|
|000003a0| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|000003b0| 2d 63 6c 65 61 72 2d 65 | 78 70 75 6e 67 65 2d 69 |-clear-e|xpunge-i|
|000003c0| 6e 76 61 6c 69 64 61 74 | 65 64 2d 75 6e 64 6f 73 |nvalidat|ed-undos|
|000003d0| 20 23 5b 6e 69 6c 20 22 | 08 c1 1a 89 1b ab b2 0b | #[nil "|........|
|000003e0| 40 ac 84 0b 12 aa a4 0b | 40 40 c4 61 ac 9b 0b 40 |@.......|@@.a...@|
|000003f0| 41 40 c5 48 c5 48 c6 61 | ab 8f 5c 6e ab 87 5c 6e |A@.H.H.a|..\n..\n|
|00000400| 0b 41 a1 88 aa 87 0b 41 | 10 aa 82 0b 12 0b 41 89 |.A.....A|......A.|
|00000410| 13 ac 4e 2a c7 20 87 22 | 20 5b 76 6d 2d 75 6e 64 |..N*. ."| [vm-und|
|00000420| 6f 2d 72 65 63 6f 72 64 | 2d 6c 69 73 74 20 6e 69 |o-record|-list ni|
|00000430| 6c 20 75 64 70 2d 70 72 | 65 76 20 75 64 70 20 76 |l udp-pr|ev udp v|
|00000440| 6d 2d 73 65 74 2d 62 75 | 66 66 65 72 2d 6d 6f 64 |m-set-bu|ffer-mod|
|00000450| 69 66 69 65 64 2d 70 20 | 32 20 65 78 70 75 6e 67 |ified-p |2 expung|
|00000460| 65 64 20 76 6d 2d 63 6c | 65 61 72 2d 6d 6f 64 69 |ed vm-cl|ear-modi|
|00000470| 66 69 63 61 74 69 6f 6e | 2d 66 6c 61 67 2d 75 6e |fication|-flag-un|
|00000480| 64 6f 73 5d 20 33 5d 29 | 0a 28 64 65 66 61 6c 69 |dos] 3])|.(defali|
|00000490| 61 73 20 27 76 6d 2d 63 | 6c 65 61 72 2d 76 69 72 |as 'vm-c|lear-vir|
|000004a0| 74 75 61 6c 2d 71 75 69 | 74 2d 69 6e 76 61 6c 69 |tual-qui|t-invali|
|000004b0| 64 61 74 65 64 2d 75 6e | 64 6f 73 20 23 5b 6e 69 |dated-un|dos #[ni|
|000004c0| 6c 20 22 08 c1 1a 89 1b | ab b2 0b 40 ac 84 0b 12 |l ".....|...@....|
|000004d0| aa a4 0b 40 40 c4 61 ac | 9b 0b 40 41 40 c5 48 c6 |...@@.a.|..@A@.H.|
|000004e0| 48 c7 6b ab 8f 5c 6e ab | 87 5c 6e 0b 41 a1 88 aa |H.k..\n.|.\n.A...|
|000004f0| 87 0b 41 10 aa 82 0b 12 | 0b 41 89 13 ac 4e 2a c8 |..A.....|.A...N*.|
|00000500| 20 87 22 20 5b 76 6d 2d | 75 6e 64 6f 2d 72 65 63 | ." [vm-|undo-rec|
|00000510| 6f 72 64 2d 6c 69 73 74 | 20 6e 69 6c 20 75 64 70 |ord-list| nil udp|
|00000520| 2d 70 72 65 76 20 75 64 | 70 20 76 6d 2d 73 65 74 |-prev ud|p vm-set|
|00000530| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00000540| 2d 70 20 31 20 38 20 22 | 51 22 20 76 6d 2d 63 6c |-p 1 8 "|Q" vm-cl|
|00000550| 65 61 72 2d 6d 6f 64 69 | 66 69 63 61 74 69 6f 6e |ear-modi|fication|
|00000560| 2d 66 6c 61 67 2d 75 6e | 64 6f 73 5d 20 33 5d 29 |-flag-un|dos] 3])|
|00000570| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 76 6d 2d 63 |.(defali|as 'vm-c|
|00000580| 6c 65 61 72 2d 6d 6f 64 | 69 66 69 63 61 74 69 6f |lear-mod|ificatio|
|00000590| 6e 2d 66 6c 61 67 2d 75 | 6e 64 6f 73 20 23 5b 6e |n-flag-u|ndos #[n|
|000005a0| 69 6c 20 22 08 c1 1a 89 | 1b ab a6 0b 40 ac 84 0b |il "....|....@...|
|000005b0| 12 aa 98 0b 40 40 c4 61 | ab 8f 5c 6e ab 87 5c 6e |....@@.a|..\n..\n|
|000005c0| 0b 41 a1 88 aa 87 0b 41 | 10 aa 82 0b 12 0b 41 89 |.A.....A|......A.|
|000005d0| 13 ac 5a c5 20 2a 87 22 | 20 5b 76 6d 2d 75 6e 64 |..Z. *."| [vm-und|
|000005e0| 6f 2d 72 65 63 6f 72 64 | 2d 6c 69 73 74 20 6e 69 |o-record|-list ni|
|000005f0| 6c 20 75 64 70 2d 70 72 | 65 76 20 75 64 70 20 76 |l udp-pr|ev udp v|
|00000600| 6d 2d 73 65 74 2d 62 75 | 66 66 65 72 2d 6d 6f 64 |m-set-bu|ffer-mod|
|00000610| 69 66 69 65 64 2d 70 20 | 76 6d 2d 73 71 75 65 65 |ified-p |vm-squee|
|00000620| 7a 65 2d 63 6f 6e 73 65 | 63 75 74 69 76 65 2d 75 |ze-conse|cutive-u|
|00000630| 6e 64 6f 2d 62 6f 75 6e | 64 61 72 69 65 73 5d 20 |ndo-boun|daries] |
|00000640| 33 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |3]).(def|alias 'v|
|00000650| 6d 2d 73 71 75 65 65 7a | 65 2d 63 6f 6e 73 65 63 |m-squeez|e-consec|
|00000660| 75 74 69 76 65 2d 75 6e | 64 6f 2d 62 6f 75 6e 64 |utive-un|do-bound|
|00000670| 61 72 69 65 73 20 23 5b | 6e 69 6c 20 22 08 c1 1a |aries #[|nil "...|
|00000680| 89 1b ab 9a 0b 40 ac 8e | 5c 6e ab 8b 5c 6e 40 ac |.....@..|\n..\n@.|
|00000690| 87 5c 6e 0b 41 a1 88 aa | 82 0b 12 0b 41 89 13 ac |.\n.A...|....A...|
|000006a0| 66 08 c4 6b ab 82 c1 10 | 2a 08 3f ad 8a c5 20 ad |f..k....|*.?... .|
|000006b0| 86 c6 20 ad 82 c7 20 87 | 22 20 5b 76 6d 2d 75 6e |.. ... .|" [vm-un|
|000006c0| 64 6f 2d 72 65 63 6f 72 | 64 2d 6c 69 73 74 20 6e |do-recor|d-list n|
|000006d0| 69 6c 20 75 64 70 2d 70 | 72 65 76 20 75 64 70 20 |il udp-p|rev udp |
|000006e0| 28 6e 69 6c 29 20 76 6d | 2d 6d 65 6e 75 2d 73 75 |(nil) vm|-menu-su|
|000006f0| 70 70 6f 72 74 2d 70 6f | 73 73 69 62 6c 65 2d 70 |pport-po|ssible-p|
|00000700| 20 76 6d 2d 6d 65 6e 75 | 2d 78 65 6d 61 63 73 2d | vm-menu|-xemacs-|
|00000710| 6d 65 6e 75 73 2d 70 20 | 76 6d 2d 6d 65 6e 75 2d |menus-p |vm-menu-|
|00000720| 73 65 74 2d 6d 65 6e 75 | 62 61 72 2d 64 69 72 74 |set-menu|bar-dirt|
|00000730| 79 2d 66 6c 61 67 5d 20 | 33 5d 29 0a 28 64 65 66 |y-flag] |3]).(def|
|00000740| 61 6c 69 61 73 20 27 76 | 6d 2d 75 6e 64 6f 2d 72 |alias 'v|m-undo-r|
|00000750| 65 63 6f 72 64 20 23 5b | 28 73 65 78 70 29 20 22 |ecord #[|(sexp) "|
|00000760| 08 ac 8b c1 20 ab 87 c2 | 20 ab 83 c3 20 88 0c 08 |.... ...| ... ...|
|00000770| 42 89 10 87 22 20 5b 76 | 6d 2d 75 6e 64 6f 2d 72 |B..." [v|m-undo-r|
|00000780| 65 63 6f 72 64 2d 6c 69 | 73 74 20 76 6d 2d 6d 65 |ecord-li|st vm-me|
|00000790| 6e 75 2d 73 75 70 70 6f | 72 74 2d 70 6f 73 73 69 |nu-suppo|rt-possi|
|000007a0| 62 6c 65 2d 70 20 76 6d | 2d 6d 65 6e 75 2d 78 65 |ble-p vm|-menu-xe|
|000007b0| 6d 61 63 73 2d 6d 65 6e | 75 73 2d 70 20 76 6d 2d |macs-men|us-p vm-|
|000007c0| 6d 65 6e 75 2d 73 65 74 | 2d 6d 65 6e 75 62 61 72 |menu-set|-menubar|
|000007d0| 2d 64 69 72 74 79 2d 66 | 6c 61 67 20 73 65 78 70 |-dirty-f|lag sexp|
|000007e0| 5d 20 32 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 2]).(d|efalias |
|000007f0| 27 76 6d 2d 75 6e 64 6f | 2d 64 65 73 63 72 69 62 |'vm-undo|-describ|
|00000800| 65 20 23 5b 28 72 65 63 | 6f 72 64 29 20 22 08 40 |e #[(rec|ord) ".@|
|00000810| c1 b7 08 41 40 c2 1b 1c | 89 1d ab ab c6 c7 c8 0c |...A@...|........|
|00000820| c9 48 ca 48 21 0c c9 48 | cb 48 cc 08 38 ab 85 cc |.H.H!..H|.H..8...|
|00000830| 0d 38 aa 83 0d 41 40 cc | 08 38 ab 85 0d 41 40 aa |.8...A@.|.8...A@.|
|00000840| 83 cc 0d 38 25 aa ab 0d | 40 cd 61 ad a5 cc 08 38 |...8%...|@.a....8|
|00000850| 13 c6 ce c8 0c c9 48 ca | 48 21 0c c9 48 cb 48 0b |......H.|H!..H.H.|
|00000860| ac 83 cf aa 81 d0 0b ac | 83 d1 aa 85 d2 d3 0b d4 |........|........|
|00000870| 23 25 2b 87 22 20 5b 72 | 65 63 6f 72 64 20 28 28 |#%+." [r|ecord ((|
|00000880| 76 6d 2d 73 65 74 2d 6e | 65 77 2d 66 6c 61 67 20 |vm-set-n|ew-flag |
|00000890| 22 6e 65 77 22 20 22 6f | 6c 64 22 29 20 28 76 6d |"new" "o|ld") (vm|
|000008a0| 2d 73 65 74 2d 75 6e 72 | 65 61 64 2d 66 6c 61 67 |-set-unr|ead-flag|
|000008b0| 20 22 75 6e 72 65 61 64 | 22 20 22 72 65 61 64 22 | "unread|" "read"|
|000008c0| 29 20 28 76 6d 2d 73 65 | 74 2d 64 65 6c 65 74 65 |) (vm-se|t-delete|
|000008d0| 64 2d 66 6c 61 67 20 22 | 64 65 6c 65 74 65 64 22 |d-flag "|deleted"|
|000008e0| 20 22 75 6e 64 65 6c 65 | 74 65 64 22 29 20 28 76 | "undele|ted") (v|
|000008f0| 6d 2d 73 65 74 2d 66 6f | 72 77 61 72 64 65 64 2d |m-set-fo|rwarded-|
|00000900| 66 6c 61 67 20 22 66 6f | 72 77 61 72 64 65 64 22 |flag "fo|rwarded"|
|00000910| 20 22 75 6e 66 6f 72 77 | 61 72 64 65 64 22 29 20 | "unforw|arded") |
|00000920| 28 76 6d 2d 73 65 74 2d | 72 65 70 6c 69 65 64 2d |(vm-set-|replied-|
|00000930| 66 6c 61 67 20 22 61 6e | 73 77 65 72 65 64 22 20 |flag "an|swered" |
|00000940| 22 75 6e 61 6e 73 77 65 | 72 65 64 22 29 20 28 76 |"unanswe|red") (v|
|00000950| 6d 2d 73 65 74 2d 72 65 | 64 69 73 74 72 69 62 75 |m-set-re|distribu|
|00000960| 74 65 64 2d 66 6c 61 67 | 20 22 72 65 64 69 73 74 |ted-flag| "redist|
|00000970| 72 69 62 75 74 65 64 22 | 20 22 75 6e 72 65 64 69 |ributed"| "unredi|
|00000980| 73 74 72 69 62 75 74 65 | 64 22 29 20 28 76 6d 2d |stribute|d") (vm-|
|00000990| 73 65 74 2d 66 69 6c 65 | 64 2d 66 6c 61 67 20 22 |set-file|d-flag "|
|000009a0| 66 69 6c 65 64 22 20 22 | 75 6e 66 69 6c 65 64 22 |filed" "|unfiled"|
|000009b0| 29 20 28 76 6d 2d 73 65 | 74 2d 77 72 69 74 74 65 |) (vm-se|t-writte|
|000009c0| 6e 2d 66 6c 61 67 20 22 | 77 72 69 74 74 65 6e 22 |n-flag "|written"|
|000009d0| 20 22 75 6e 77 72 69 74 | 74 65 6e 22 29 29 20 6e | "unwrit|ten")) n|
|000009e0| 69 6c 20 6c 61 62 65 6c | 73 20 6d 20 63 65 6c 6c |il label|s m cell|
|000009f0| 20 6d 65 73 73 61 67 65 | 20 22 56 4d 20 55 6e 64 | message| "VM Und|
|00000a00| 6f 21 20 25 73 2f 25 73 | 20 25 73 20 2d 3e 20 25 |o! %s/%s| %s -> %|
|00000a10| 73 22 20 62 75 66 66 65 | 72 2d 6e 61 6d 65 20 31 |s" buffe|r-name 1|
|00000a20| 20 39 20 30 20 32 20 76 | 6d 2d 73 65 74 2d 6c 61 | 9 0 2 v|m-set-la|
|00000a30| 62 65 6c 73 20 22 56 4d | 20 55 6e 64 6f 21 20 25 |bels "VM| Undo! %|
|00000a40| 73 2f 25 73 20 25 73 25 | 73 22 20 22 6c 6f 73 74 |s/%s %s%|s" "lost|
|00000a50| 20 61 6c 6c 20 69 74 73 | 20 6c 61 62 65 6c 73 22 | all its| labels"|
|00000a60| 20 22 6c 61 62 65 6c 73 | 20 73 65 74 20 74 6f 20 | "labels| set to |
|00000a70| 22 20 22 22 20 6d 61 70 | 63 6f 6e 63 61 74 20 69 |" "" map|concat i|
|00000a80| 64 65 6e 74 69 74 79 20 | 22 2c 20 22 5d 20 31 30 |dentity |", "] 10|
|00000a90| 5d 29 0a 28 64 65 66 61 | 6c 69 61 73 20 27 76 6d |]).(defa|lias 'vm|
|00000aa0| 2d 75 6e 64 6f 2d 73 65 | 74 2d 6d 65 73 73 61 67 |-undo-se|t-messag|
|00000ab0| 65 2d 70 6f 69 6e 74 65 | 72 20 23 5b 28 72 65 63 |e-pointe|r #[(rec|
|00000ac0| 6f 72 64 29 20 22 08 40 | c1 61 3f ad 9f 08 41 40 |ord) ".@|.a?...A@|
|00000ad0| 5c 6e 61 3f ad 97 c3 5c | 6e 08 41 40 c4 48 c5 48 |\na?...\|n.A@.H.H|
|00000ae0| 4a 41 ae 82 0e 06 5c 22 | 88 c7 1e 08 c9 20 29 87 |JA....\"|..... ).|
|00000af0| 22 20 5b 72 65 63 6f 72 | 64 20 76 6d 2d 73 65 74 |" [recor|d vm-set|
|00000b00| 2d 62 75 66 66 65 72 2d | 6d 6f 64 69 66 69 65 64 |-buffer-|modified|
|00000b10| 2d 70 20 76 6d 2d 6d 65 | 73 73 61 67 65 2d 70 6f |-p vm-me|ssage-po|
|00000b20| 69 6e 74 65 72 20 76 6d | 2d 72 65 63 6f 72 64 2d |inter vm|-record-|
|00000b30| 61 6e 64 2d 63 68 61 6e | 67 65 2d 6d 65 73 73 61 |and-chan|ge-messa|
|00000b40| 67 65 2d 70 6f 69 6e 74 | 65 72 20 31 20 36 20 76 |ge-point|er 1 6 v|
|00000b50| 6d 2d 6d 65 73 73 61 67 | 65 2d 6c 69 73 74 20 74 |m-messag|e-list t|
|00000b60| 20 76 6d 2d 66 6f 6c 64 | 65 72 2d 72 65 61 64 2d | vm-fold|er-read-|
|00000b70| 6f 6e 6c 79 20 76 6d 2d | 70 72 65 76 69 65 77 2d |only vm-|preview-|
|00000b80| 63 75 72 72 65 6e 74 2d | 6d 65 73 73 61 67 65 5d |current-|message]|
|00000b90| 20 34 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | 4]).(de|falias '|
|00000ba0| 76 6d 2d 75 6e 64 6f 20 | 23 5b 6e 69 6c 20 22 08 |vm-undo |#[nil ".|
|00000bb0| ab 8d c1 08 21 ac 85 c2 | c3 21 ab 83 08 71 88 c4 |....!...|.!...q..|
|00000bc0| 20 88 0d ab 88 c6 c7 70 | 43 5c 22 88 aa 75 c8 c9 | ......p|C\"..u..|
|00000bd0| 89 ca cb 24 88 cc 20 1e | 0d 0e 0e cf 61 ac 84 0e |...$.. .|....a...|
|00000be0| 10 16 11 0e 11 ac 84 c2 | d2 21 88 0e 11 41 89 16 |........|.!...A..|
|00000bf0| 11 40 ab 9a d3 0e 11 40 | 21 88 d4 0e 11 40 21 88 |.@.....@|!....@!.|
|00000c00| d5 0e 11 40 21 88 0e 11 | 41 89 16 11 aa 63 0e 0d |...@!...|A....c..|
|00000c10| ab 87 cc 20 ac 83 d6 20 | 88 d7 20 29 87 22 20 5b |... ... |.. )." [|
|00000c20| 76 6d 2d 6d 61 69 6c 2d | 62 75 66 66 65 72 20 62 |vm-mail-|buffer b|
|00000c30| 75 66 66 65 72 2d 6e 61 | 6d 65 20 65 72 72 6f 72 |uffer-na|me error|
|00000c40| 20 22 46 6f 6c 64 65 72 | 20 62 75 66 66 65 72 20 | "Folder| buffer |
|00000c50| 68 61 73 20 62 65 65 6e | 20 6b 69 6c 6c 65 64 2e |has been| killed.|
|00000c60| 22 20 76 6d 2d 63 68 65 | 63 6b 2d 66 6f 72 2d 6b |" vm-che|ck-for-k|
|00000c70| 69 6c 6c 65 64 2d 73 75 | 6d 6d 61 72 79 20 76 6d |illed-su|mmary vm|
|00000c80| 2d 66 6f 6c 64 65 72 2d | 72 65 61 64 2d 6f 6e 6c |-folder-|read-onl|
|00000c90| 79 20 73 69 67 6e 61 6c | 20 66 6f 6c 64 65 72 2d |y signal| folder-|
|00000ca0| 72 65 61 64 2d 6f 6e 6c | 79 20 76 6d 2d 64 69 73 |read-onl|y vm-dis|
|00000cb0| 70 6c 61 79 20 6e 69 6c | 20 28 76 6d 2d 75 6e 64 |play nil| (vm-und|
|00000cc0| 6f 29 20 28 76 6d 2d 75 | 6e 64 6f 29 20 62 75 66 |o) (vm-u|ndo) buf|
|00000cd0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 6d |fer-modi|fied-p m|
|00000ce0| 6f 64 69 66 69 65 64 20 | 6c 61 73 74 2d 63 6f 6d |odified |last-com|
|00000cf0| 6d 61 6e 64 20 76 6d 2d | 75 6e 64 6f 20 76 6d 2d |mand vm-|undo vm-|
|00000d00| 75 6e 64 6f 2d 72 65 63 | 6f 72 64 2d 6c 69 73 74 |undo-rec|ord-list|
|00000d10| 20 76 6d 2d 75 6e 64 6f | 2d 72 65 63 6f 72 64 2d | vm-undo|-record-|
|00000d20| 70 6f 69 6e 74 65 72 20 | 22 4e 6f 20 66 75 72 74 |pointer |"No furt|
|00000d30| 68 65 72 20 56 4d 20 75 | 6e 64 6f 20 69 6e 66 6f |her VM u|ndo info|
|00000d40| 72 6d 61 74 69 6f 6e 20 | 61 76 61 69 6c 61 62 6c |rmation |availabl|
|00000d50| 65 22 20 76 6d 2d 75 6e | 64 6f 2d 73 65 74 2d 6d |e" vm-un|do-set-m|
|00000d60| 65 73 73 61 67 65 2d 70 | 6f 69 6e 74 65 72 20 76 |essage-p|ointer v|
|00000d70| 6d 2d 75 6e 64 6f 2d 64 | 65 73 63 72 69 62 65 20 |m-undo-d|escribe |
|00000d80| 65 76 61 6c 20 64 65 6c | 65 74 65 2d 61 75 74 6f |eval del|ete-auto|
|00000d90| 2d 73 61 76 65 2d 66 69 | 6c 65 2d 69 66 2d 6e 65 |-save-fi|le-if-ne|
|00000da0| 63 65 73 73 61 72 79 20 | 76 6d 2d 75 70 64 61 74 |cessary |vm-updat|
|00000db0| 65 2d 73 75 6d 6d 61 72 | 79 2d 61 6e 64 2d 6d 6f |e-summar|y-and-mo|
|00000dc0| 64 65 2d 6c 69 6e 65 5d | 20 36 20 22 5c 0a 55 6e |de-line]| 6 "\.Un|
|00000dd0| 64 6f 20 6c 61 73 74 20 | 63 68 61 6e 67 65 20 74 |do last |change t|
|00000de0| 6f 20 6d 65 73 73 61 67 | 65 20 61 74 74 72 69 62 |o messag|e attrib|
|00000df0| 75 74 65 73 20 69 6e 20 | 74 68 65 20 63 75 72 72 |utes in |the curr|
|00000e00| 65 6e 74 20 66 6f 6c 64 | 65 72 2e 0a 43 6f 6e 73 |ent fold|er..Cons|
|00000e10| 65 63 75 74 69 76 65 20 | 69 6e 76 6f 63 61 74 69 |ecutive |invocati|
|00000e20| 6f 6e 73 20 6f 66 20 74 | 68 69 73 20 63 6f 6d 6d |ons of t|his comm|
|00000e30| 61 6e 64 20 63 61 75 73 | 65 20 73 65 71 75 65 6e |and caus|e sequen|
|00000e40| 74 69 61 6c 6c 79 20 65 | 61 72 6c 69 65 72 0a 63 |tially e|arlier.c|
|00000e50| 68 61 6e 67 65 73 20 74 | 6f 20 62 65 20 75 6e 64 |hanges t|o be und|
|00000e60| 6f 6e 65 2e 20 20 41 66 | 74 65 72 20 61 6e 20 69 |one. Af|ter an i|
|00000e70| 6e 74 65 72 76 65 6e 69 | 6e 67 20 63 6f 6d 6d 61 |nterveni|ng comma|
|00000e80| 6e 64 20 62 65 74 77 65 | 65 6e 20 75 6e 64 6f 73 |nd betwe|en undos|
|00000e90| 2c 0a 74 68 65 20 75 6e | 64 6f 73 20 74 68 65 6d |,.the un|dos them|
|00000ea0| 73 65 6c 76 65 73 20 62 | 65 63 6f 6d 65 20 75 6e |selves b|ecome un|
|00000eb0| 64 6f 61 62 6c 65 2e 22 | 20 6e 69 6c 5d 29 0a 28 |doable."| nil]).(|
|00000ec0| 64 65 66 61 6c 69 61 73 | 20 27 76 6d 2d 73 65 74 |defalias| 'vm-set|
|00000ed0| 2d 6d 65 73 73 61 67 65 | 2d 61 74 74 72 69 62 75 |-message|-attribu|
|00000ee0| 74 65 73 20 23 5b 28 73 | 74 72 69 6e 67 20 63 6f |tes #[(s|tring co|
|00000ef0| 75 6e 74 29 20 22 c0 20 | 88 09 ab 8d c2 09 21 ac |unt) ". |......!.|
|00000f00| 85 c3 c4 21 ab 83 09 71 | 88 c5 20 88 0e 06 ab 88 |...!...q|.. .....|
|00000f10| c7 c8 70 43 5c 22 88 aa | 74 c9 20 88 ca cb 89 cc |..pC\"..|t. .....|
|00000f20| cd 24 88 ce 0e 0f d0 5c | 22 d1 0e 12 21 cb 89 89 |.$.....\|"...!...|
|00000f30| 1e 13 1e 14 1e 15 1e 16 | 1e 17 0e 16 83 9f 01 0e |........|........|
|00000f40| 16 40 16 13 0e 17 89 16 | 15 83 96 01 0e 15 40 89 |.@......|......@.|
|00000f50| 16 14 d8 98 ab 89 d9 0e | 13 da 5c 22 88 82 8d 01 |........|..\"....|
|00000f60| 0e 14 db 98 ab 89 d9 0e | 13 da 5c 22 88 82 8d 01 |........|..\"....|
|00000f70| 0e 14 dc 98 ab 89 dd 0e | 13 da 5c 22 88 82 8d 01 |........|..\"....|
|00000f80| 0e 14 de 98 ab 89 dd 0e | 13 da 5c 22 88 82 8d 01 |........|..\"....|
|00000f90| 0e 14 df 98 ab 8f d9 0e | 13 cb 5c 22 88 dd 0e 13 |........|..\"....|
|00000fa0| cb 5c 22 88 82 8d 01 0e | 14 e0 98 ab 89 e1 0e 13 |.\".....|........|
|00000fb0| da 5c 22 88 82 8d 01 0e | 14 e2 98 ab 89 e3 0e 13 |.\".....|........|
|00000fc0| da 5c 22 88 82 8d 01 0e | 14 e4 98 ab 89 e3 0e 13 |.\".....|........|
|00000fd0| da 5c 22 88 82 8d 01 0e | 14 e5 98 ab 89 e6 0e 13 |.\".....|........|
|00000fe0| da 5c 22 88 82 8d 01 0e | 14 e7 98 ab 89 e8 0e 13 |.\".....|........|
|00000ff0| da 5c 22 88 82 8d 01 0e | 14 e9 98 ab 89 ea 0e 13 |.\".....|........|
|00001000| da 5c 22 88 82 8d 01 0e | 14 eb 98 ab 88 ec 0e 13 |.\".....|........|
|00001010| da 5c 22 88 aa fc 0e 14 | ed 98 ab 88 ee 0e 13 da |.\".....|........|
|00001020| 5c 22 88 aa ee 0e 14 ef | 98 ab 88 e1 0e 13 cb 5c |\"......|.......\|
|00001030| 22 88 aa e0 0e 14 f0 98 | ab 88 e3 0e 13 cb 5c 22 |".......|......\"|
|00001040| 88 aa d2 0e 14 f1 98 ab | 88 e3 0e 13 cb 5c 22 88 |........|.....\".|
|00001050| aa c4 0e 14 f2 98 ab 88 | e6 0e 13 cb 5c 22 88 aa |........|....\"..|
|00001060| b6 0e 14 f3 98 ab 88 e8 | 0e 13 cb 5c 22 88 aa a8 |........|...\"...|
|00001070| 0e 14 f4 98 ab 88 ea 0e | 13 cb 5c 22 88 aa 9a 0e |........|..\"....|
|00001080| 14 f5 98 ab 88 ec 0e 13 | cb 5c 22 88 aa 8c 0e 14 |........|.\".....|
|00001090| f6 98 ab 86 ee 0e 13 cb | 5c 22 88 0e 15 41 89 16 |........|\"...A..|
|000010a0| 15 84 54 00 0e 16 41 89 | 16 16 84 47 00 f7 20 2d |..T...A.|...G.. -|
|000010b0| 87 22 20 5b 76 6d 2d 66 | 6f 6c 6c 6f 77 2d 73 75 |." [vm-f|ollow-su|
|000010c0| 6d 6d 61 72 79 2d 63 75 | 72 73 6f 72 20 76 6d 2d |mmary-cu|rsor vm-|
|000010d0| 6d 61 69 6c 2d 62 75 66 | 66 65 72 20 62 75 66 66 |mail-buf|fer buff|
|000010e0| 65 72 2d 6e 61 6d 65 20 | 65 72 72 6f 72 20 22 46 |er-name |error "F|
|000010f0| 6f 6c 64 65 72 20 62 75 | 66 66 65 72 20 68 61 73 |older bu|ffer has|
|00001100| 20 62 65 65 6e 20 6b 69 | 6c 6c 65 64 2e 22 20 76 | been ki|lled." v|
|00001110| 6d 2d 63 68 65 63 6b 2d | 66 6f 72 2d 6b 69 6c 6c |m-check-|for-kill|
|00001120| 65 64 2d 73 75 6d 6d 61 | 72 79 20 76 6d 2d 66 6f |ed-summa|ry vm-fo|
|00001130| 6c 64 65 72 2d 72 65 61 | 64 2d 6f 6e 6c 79 20 73 |lder-rea|d-only s|
|00001140| 69 67 6e 61 6c 20 66 6f | 6c 64 65 72 2d 72 65 61 |ignal fo|lder-rea|
|00001150| 64 2d 6f 6e 6c 79 20 76 | 6d 2d 65 72 72 6f 72 2d |d-only v|m-error-|
|00001160| 69 66 2d 66 6f 6c 64 65 | 72 2d 65 6d 70 74 79 20 |if-folde|r-empty |
|00001170| 76 6d 2d 64 69 73 70 6c | 61 79 20 6e 69 6c 20 28 |vm-displ|ay nil (|
|00001180| 76 6d 2d 73 65 74 2d 6d | 65 73 73 61 67 65 2d 61 |vm-set-m|essage-a|
|00001190| 74 74 72 69 62 75 74 65 | 73 29 20 28 76 6d 2d 73 |ttribute|s) (vm-s|
|000011a0| 65 74 2d 6d 65 73 73 61 | 67 65 2d 61 74 74 72 69 |et-messa|ge-attri|
|000011b0| 62 75 74 65 73 29 20 76 | 6d 2d 70 61 72 73 65 20 |butes) v|m-parse |
|000011c0| 73 74 72 69 6e 67 20 22 | 5b 20 09 5d 2a 5c 5c 28 |string "|[ .]*\\(|
|000011d0| 5b 5e 20 09 5d 2b 5c 5c | 29 22 20 76 6d 2d 73 65 |[^ .]+\\|)" vm-se|
|000011e0| 6c 65 63 74 2d 6d 61 72 | 6b 65 64 2d 6f 72 2d 70 |lect-mar|ked-or-p|
|000011f0| 72 65 66 69 78 65 64 2d | 6d 65 73 73 61 67 65 73 |refixed-|messages|
|00001200| 20 63 6f 75 6e 74 20 6d | 20 6e 61 6d 65 20 6e 2d | count m| name n-|
|00001210| 6c 69 73 74 20 6d 2d 6c | 69 73 74 20 6e 61 6d 65 |list m-l|ist name|
|00001220| 2d 6c 69 73 74 20 22 6e | 65 77 22 20 76 6d 2d 73 |-list "n|ew" vm-s|
|00001230| 65 74 2d 6e 65 77 2d 66 | 6c 61 67 20 74 20 22 72 |et-new-f|lag t "r|
|00001240| 65 63 65 6e 74 22 20 22 | 75 6e 72 65 61 64 22 20 |ecent" "|unread" |
|00001250| 76 6d 2d 73 65 74 2d 75 | 6e 72 65 61 64 2d 66 6c |vm-set-u|nread-fl|
|00001260| 61 67 20 22 75 6e 73 65 | 65 6e 22 20 22 72 65 61 |ag "unse|en" "rea|
|00001270| 64 22 20 22 64 65 6c 65 | 74 65 64 22 20 76 6d 2d |d" "dele|ted" vm-|
|00001280| 73 65 74 2d 64 65 6c 65 | 74 65 64 2d 66 6c 61 67 |set-dele|ted-flag|
|00001290| 20 22 72 65 70 6c 69 65 | 64 22 20 76 6d 2d 73 65 | "replie|d" vm-se|
|000012a0| 74 2d 72 65 70 6c 69 65 | 64 2d 66 6c 61 67 20 22 |t-replie|d-flag "|
|000012b0| 61 6e 73 77 65 72 65 64 | 22 20 22 66 6f 72 77 61 |answered|" "forwa|
|000012c0| 72 64 65 64 22 20 76 6d | 2d 73 65 74 2d 66 6f 72 |rded" vm|-set-for|
|000012d0| 77 61 72 64 65 64 2d 66 | 6c 61 67 20 22 72 65 64 |warded-f|lag "red|
|000012e0| 69 73 74 72 69 62 75 74 | 65 64 22 20 76 6d 2d 73 |istribut|ed" vm-s|
|000012f0| 65 74 2d 72 65 64 69 73 | 74 72 69 62 75 74 65 64 |et-redis|tributed|
|00001300| 2d 66 6c 61 67 20 22 66 | 69 6c 65 64 22 20 76 6d |-flag "f|iled" vm|
|00001310| 2d 73 65 74 2d 66 69 6c | 65 64 2d 66 6c 61 67 20 |-set-fil|ed-flag |
|00001320| 22 77 72 69 74 74 65 6e | 22 20 76 6d 2d 73 65 74 |"written|" vm-set|
|00001330| 2d 77 72 69 74 74 65 6e | 2d 66 6c 61 67 20 22 65 |-written|-flag "e|
|00001340| 64 69 74 65 64 22 20 76 | 6d 2d 73 65 74 2d 65 64 |dited" v|m-set-ed|
|00001350| 69 74 65 64 2d 66 6c 61 | 67 2d 6f 66 20 22 75 6e |ited-fla|g-of "un|
|00001360| 64 65 6c 65 74 65 64 22 | 20 22 75 6e 72 65 70 6c |deleted"| "unrepl|
|00001370| 69 65 64 22 20 22 75 6e | 61 6e 73 77 65 72 65 64 |ied" "un|answered|
|00001380| 22 20 22 75 6e 66 6f 72 | 77 61 72 64 65 64 22 20 |" "unfor|warded" |
|00001390| 22 75 6e 72 65 64 69 73 | 74 72 69 62 75 74 65 64 |"unredis|tributed|
|000013a0| 22 20 22 75 6e 66 69 6c | 65 64 22 20 22 75 6e 77 |" "unfil|ed" "unw|
|000013b0| 72 69 74 74 65 6e 22 20 | 22 75 6e 65 64 69 74 65 |ritten" |"unedite|
|000013c0| 64 22 20 76 6d 2d 75 70 | 64 61 74 65 2d 73 75 6d |d" vm-up|date-sum|
|000013d0| 6d 61 72 79 2d 61 6e 64 | 2d 6d 6f 64 65 2d 6c 69 |mary-and|-mode-li|
|000013e0| 6e 65 5d 20 36 20 22 5c | 0a 53 65 74 20 6d 65 73 |ne] 6 "\|.Set mes|
|000013f0| 73 61 67 65 20 61 74 74 | 72 69 62 75 74 65 73 2e |sage att|ributes.|
|00001400| 0a 55 73 65 20 74 68 69 | 73 20 63 6f 6d 6d 61 6e |.Use thi|s comman|
|00001410| 64 20 74 6f 20 63 68 61 | 6e 67 65 20 61 74 74 72 |d to cha|nge attr|
|00001420| 69 62 75 74 65 73 20 6c | 69 6b 65 20 60 64 65 6c |ibutes l|ike `del|
|00001430| 65 74 65 64 27 20 6f 72 | 0a 60 72 65 70 6c 69 65 |eted' or|.`replie|
|00001440| 64 27 2e 20 20 49 6e 74 | 65 72 61 63 74 69 76 65 |d'. Int|eractive|
|00001450| 6c 79 20 79 6f 75 20 77 | 69 6c 6c 20 62 65 20 70 |ly you w|ill be p|
|00001460| 72 6f 6d 70 74 65 64 20 | 66 6f 72 20 74 68 65 20 |rompted |for the |
|00001470| 61 74 74 72 69 62 75 74 | 65 73 0a 74 6f 20 62 65 |attribut|es.to be|
|00001480| 20 63 68 61 6e 67 65 64 | 2c 20 61 6e 64 20 6f 6e | changed|, and on|
|00001490| 6c 79 20 74 68 65 20 61 | 74 74 72 69 62 75 74 65 |ly the a|ttribute|
|000014a0| 73 20 79 6f 75 20 65 6e | 74 65 72 20 77 69 6c 6c |s you en|ter will|
|000014b0| 20 62 65 20 61 6c 74 65 | 72 65 64 2e 0a 59 6f 75 | be alte|red..You|
|000014c0| 20 63 61 6e 20 75 73 65 | 20 63 6f 6d 70 6c 65 74 | can use| complet|
|000014d0| 69 6f 6e 20 74 6f 20 65 | 78 70 61 6e 64 20 74 68 |ion to e|xpand th|
|000014e0| 65 20 61 74 74 72 69 62 | 75 74 65 20 6e 61 6d 65 |e attrib|ute name|
|000014f0| 73 2e 20 20 54 68 65 20 | 6e 61 6d 65 73 0a 73 68 |s. The |names.sh|
|00001500| 6f 75 6c 64 20 62 65 20 | 65 6e 74 65 72 65 64 20 |ould be |entered |
|00001510| 61 73 20 61 20 73 70 61 | 63 65 20 73 65 70 61 72 |as a spa|ce separ|
|00001520| 61 74 65 64 20 6c 69 73 | 74 2e 0a 0a 41 20 6e 75 |ated lis|t...A nu|
|00001530| 6d 65 72 69 63 20 70 72 | 65 66 69 78 20 61 72 67 |meric pr|efix arg|
|00001540| 75 6d 65 6e 74 20 43 4f | 55 4e 54 20 63 61 75 73 |ument CO|UNT caus|
|00001550| 65 73 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 6d |es the c|urrent m|
|00001560| 65 73 73 61 67 65 20 61 | 6e 64 0a 74 68 65 20 6e |essage a|nd.the n|
|00001570| 65 78 74 20 43 4f 55 4e | 54 2d 31 20 6d 65 73 73 |ext COUN|T-1 mess|
|00001580| 61 67 65 20 74 6f 20 68 | 61 76 65 20 74 68 65 69 |age to h|ave thei|
|00001590| 72 20 61 74 74 72 69 62 | 75 74 65 73 20 61 6c 74 |r attrib|utes alt|
|000015a0| 65 72 65 64 2e 20 20 41 | 0a 6e 65 67 61 74 69 76 |ered. A|.negativ|
|000015b0| 65 20 43 4f 55 4e 54 20 | 61 72 67 20 63 61 75 73 |e COUNT |arg caus|
|000015c0| 65 73 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 6d |es the c|urrent m|
|000015d0| 65 73 73 61 67 65 20 61 | 6e 64 20 74 68 65 20 70 |essage a|nd the p|
|000015e0| 72 65 76 69 6f 75 73 0a | 43 4f 55 4e 54 2d 31 20 |revious.|COUNT-1 |
|000015f0| 6d 65 73 73 61 67 65 73 | 20 74 6f 20 62 65 20 61 |messages| to be a|
|00001600| 6c 74 65 72 65 64 2e 20 | 20 43 4f 55 4e 54 20 64 |ltered. | COUNT d|
|00001610| 65 66 61 75 6c 74 73 20 | 74 6f 20 6f 6e 65 2e 22 |efaults |to one."|
|00001620| 20 28 6c 65 74 20 28 28 | 6c 61 73 74 2d 63 6f 6d | (let ((|last-com|
|00001630| 6d 61 6e 64 20 6c 61 73 | 74 2d 63 6f 6d 6d 61 6e |mand las|t-comman|
|00001640| 64 29 20 28 74 68 69 73 | 2d 63 6f 6d 6d 61 6e 64 |d) (this|-command|
|00001650| 20 74 68 69 73 2d 63 6f | 6d 6d 61 6e 64 29 29 20 | this-co|mmand)) |
|00001660| 28 76 6d 2d 66 6f 6c 6c | 6f 77 2d 73 75 6d 6d 61 |(vm-foll|ow-summa|
|00001670| 72 79 2d 63 75 72 73 6f | 72 29 20 28 6c 69 73 74 |ry-curso|r) (list|
|00001680| 20 28 76 6d 2d 72 65 61 | 64 2d 73 74 72 69 6e 67 | (vm-rea|d-string|
|00001690| 20 22 53 65 74 20 61 74 | 74 72 69 62 75 74 65 73 | "Set at|tributes|
|000016a0| 3a 20 22 20 76 6d 2d 73 | 75 70 70 6f 72 74 65 64 |: " vm-s|upported|
|000016b0| 2d 61 74 74 72 69 62 75 | 74 65 2d 6e 61 6d 65 73 |-attribu|te-names|
|000016c0| 20 74 29 20 28 70 72 65 | 66 69 78 2d 6e 75 6d 65 | t) (pre|fix-nume|
|000016d0| 72 69 63 2d 76 61 6c 75 | 65 20 63 75 72 72 65 6e |ric-valu|e curren|
|000016e0| 74 2d 70 72 65 66 69 78 | 2d 61 72 67 29 29 29 5d |t-prefix|-arg)))]|
|000016f0| 29 0a 28 64 65 66 61 6c | 69 61 73 20 27 76 6d 2d |).(defal|ias 'vm-|
|00001700| 61 64 64 2d 6d 65 73 73 | 61 67 65 2d 6c 61 62 65 |add-mess|age-labe|
|00001710| 6c 73 20 23 5b 28 73 74 | 72 69 6e 67 20 63 6f 75 |ls #[(st|ring cou|
|00001720| 6e 74 29 20 22 c0 20 88 | 09 ab 8d c2 09 21 ac 85 |nt) ". .|.....!..|
|00001730| c3 c4 21 ab 83 09 71 88 | c5 20 88 0e 06 ab 88 c7 |..!...q.|. ......|
|00001740| c8 70 43 5c 22 88 aa 74 | c9 20 88 ca 0e 0b 0e 0c |.pC\"..t|. ......|
|00001750| cd 23 87 22 20 5b 76 6d | 2d 66 6f 6c 6c 6f 77 2d |.#." [vm|-follow-|
|00001760| 73 75 6d 6d 61 72 79 2d | 63 75 72 73 6f 72 20 76 |summary-|cursor v|
|00001770| 6d 2d 6d 61 69 6c 2d 62 | 75 66 66 65 72 20 62 75 |m-mail-b|uffer bu|
|00001780| 66 66 65 72 2d 6e 61 6d | 65 20 65 72 72 6f 72 20 |ffer-nam|e error |
|00001790| 22 46 6f 6c 64 65 72 20 | 62 75 66 66 65 72 20 68 |"Folder |buffer h|
|000017a0| 61 73 20 62 65 65 6e 20 | 6b 69 6c 6c 65 64 2e 22 |as been |killed."|
|000017b0| 20 76 6d 2d 63 68 65 63 | 6b 2d 66 6f 72 2d 6b 69 | vm-chec|k-for-ki|
|000017c0| 6c 6c 65 64 2d 73 75 6d | 6d 61 72 79 20 76 6d 2d |lled-sum|mary vm-|
|000017d0| 66 6f 6c 64 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |folder-r|ead-only|
|000017e0| 20 73 69 67 6e 61 6c 20 | 66 6f 6c 64 65 72 2d 72 | signal |folder-r|
|000017f0| 65 61 64 2d 6f 6e 6c 79 | 20 76 6d 2d 65 72 72 6f |ead-only| vm-erro|
|00001800| 72 2d 69 66 2d 66 6f 6c | 64 65 72 2d 65 6d 70 74 |r-if-fol|der-empt|
|00001810| 79 20 76 6d 2d 61 64 64 | 2d 6f 72 2d 64 65 6c 65 |y vm-add|-or-dele|
|00001820| 74 65 2d 6d 65 73 73 61 | 67 65 2d 6c 61 62 65 6c |te-messa|ge-label|
|00001830| 73 20 73 74 72 69 6e 67 | 20 63 6f 75 6e 74 20 61 |s string| count a|
|00001840| 6c 6c 5d 20 34 20 22 5c | 0a 41 74 74 61 63 68 20 |ll] 4 "\|.Attach |
|00001850| 73 6f 6d 65 20 6c 61 62 | 65 6c 73 20 74 6f 20 61 |some lab|els to a|
|00001860| 20 6d 65 73 73 61 67 65 | 2e 0a 54 68 65 73 65 20 | message|..These |
|00001870| 61 72 65 20 61 72 62 69 | 74 72 61 72 79 20 75 73 |are arbi|trary us|
|00001880| 65 72 2d 64 65 66 69 6e | 65 64 20 6c 61 62 65 6c |er-defin|ed label|
|00001890| 73 2c 20 6e 6f 74 20 74 | 6f 20 62 65 20 63 6f 6e |s, not t|o be con|
|000018a0| 66 75 73 65 64 20 77 69 | 74 68 0a 6d 65 73 73 61 |fused wi|th.messa|
|000018b0| 67 65 20 61 74 74 72 69 | 62 75 74 65 73 20 6c 69 |ge attri|butes li|
|000018c0| 6b 65 20 60 6e 65 77 27 | 20 61 6e 64 20 60 64 65 |ke `new'| and `de|
|000018d0| 6c 65 74 65 64 27 2e 20 | 20 49 6e 74 65 72 61 63 |leted'. | Interac|
|000018e0| 74 69 76 65 6c 79 20 79 | 6f 75 0a 77 69 6c 6c 20 |tively y|ou.will |
|000018f0| 62 65 20 70 72 6f 6d 70 | 74 65 64 20 66 6f 72 20 |be promp|ted for |
|00001900| 74 68 65 20 6c 61 62 65 | 6c 73 20 74 6f 20 62 65 |the labe|ls to be|
|00001910| 20 61 64 64 65 64 2e 20 | 20 59 6f 75 20 63 61 6e | added. | You can|
|00001920| 20 75 73 65 0a 63 6f 6d | 70 6c 65 74 69 6f 6e 20 | use.com|pletion |
|00001930| 74 6f 20 65 78 70 61 6e | 64 20 74 68 65 20 6c 61 |to expan|d the la|
|00001940| 62 65 6c 20 6e 61 6d 65 | 73 2c 20 77 69 74 68 20 |bel name|s, with |
|00001950| 74 68 65 20 63 6f 6d 70 | 6c 65 74 69 6f 6e 20 6c |the comp|letion l|
|00001960| 69 73 74 0a 62 65 69 6e | 67 20 61 6c 6c 20 74 68 |ist.bein|g all th|
|00001970| 65 20 6c 61 62 65 6c 73 | 20 74 68 61 74 20 68 61 |e labels| that ha|
|00001980| 76 65 20 65 76 65 72 20 | 62 65 65 6e 20 75 73 65 |ve ever |been use|
|00001990| 64 20 69 6e 20 74 68 69 | 73 20 66 6f 6c 64 65 72 |d in thi|s folder|
|000019a0| 2e 0a 54 68 65 20 6e 61 | 6d 65 73 20 73 68 6f 75 |..The na|mes shou|
|000019b0| 6c 64 20 62 65 20 65 6e | 74 65 72 65 64 20 61 73 |ld be en|tered as|
|000019c0| 20 61 20 73 70 61 63 65 | 20 73 65 70 61 72 61 74 | a space| separat|
|000019d0| 65 64 20 6c 69 73 74 2e | 20 20 4c 61 62 65 6c 0a |ed list.| Label.|
|000019e0| 6e 61 6d 65 73 20 61 72 | 65 20 63 6f 6d 70 61 72 |names ar|e compar|
|000019f0| 65 64 20 63 61 73 65 2d | 69 6e 73 65 6e 73 69 74 |ed case-|insensit|
|00001a00| 69 76 65 6c 79 2e 0a 0a | 41 20 6e 75 6d 65 72 69 |ively...|A numeri|
|00001a10| 63 20 70 72 65 66 69 78 | 20 61 72 67 75 6d 65 6e |c prefix| argumen|
|00001a20| 74 20 43 4f 55 4e 54 20 | 63 61 75 73 65 73 20 74 |t COUNT |causes t|
|00001a30| 68 65 20 63 75 72 72 65 | 6e 74 20 6d 65 73 73 61 |he curre|nt messa|
|00001a40| 67 65 20 61 6e 64 0a 74 | 68 65 20 6e 65 78 74 20 |ge and.t|he next |
|00001a50| 43 4f 55 4e 54 2d 31 20 | 6d 65 73 73 61 67 65 20 |COUNT-1 |message |
|00001a60| 74 6f 20 68 61 76 65 20 | 74 68 65 20 6c 61 62 65 |to have |the labe|
|00001a70| 6c 73 20 61 64 64 65 64 | 2e 20 20 41 0a 6e 65 67 |ls added|. A.neg|
|00001a80| 61 74 69 76 65 20 43 4f | 55 4e 54 20 61 72 67 20 |ative CO|UNT arg |
|00001a90| 63 61 75 73 65 73 20 74 | 68 65 20 63 75 72 72 65 |causes t|he curre|
|00001aa0| 6e 74 20 6d 65 73 73 61 | 67 65 20 61 6e 64 20 74 |nt messa|ge and t|
|00001ab0| 68 65 20 70 72 65 76 69 | 6f 75 73 0a 43 4f 55 4e |he previ|ous.COUN|
|00001ac0| 54 2d 31 20 6d 65 73 73 | 61 67 65 73 20 74 6f 20 |T-1 mess|ages to |
|00001ad0| 62 65 20 61 6c 74 65 72 | 65 64 2e 20 20 43 4f 55 |be alter|ed. COU|
|00001ae0| 4e 54 20 64 65 66 61 75 | 6c 74 73 20 74 6f 20 6f |NT defau|lts to o|
|00001af0| 6e 65 2e 22 20 28 6c 65 | 74 20 28 28 6c 61 73 74 |ne." (le|t ((last|
|00001b00| 2d 63 6f 6d 6d 61 6e 64 | 20 6c 61 73 74 2d 63 6f |-command| last-co|
|00001b10| 6d 6d 61 6e 64 29 20 28 | 74 68 69 73 2d 63 6f 6d |mmand) (|this-com|
|00001b20| 6d 61 6e 64 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |mand thi|s-comman|
|00001b30| 64 29 20 28 76 6d 2d 63 | 6f 6d 70 6c 65 74 69 6f |d) (vm-c|ompletio|
|00001b40| 6e 2d 61 75 74 6f 2d 63 | 6f 72 72 65 63 74 20 6e |n-auto-c|orrect n|
|00001b50| 69 6c 29 20 28 63 6f 6d | 70 6c 65 74 69 6f 6e 2d |il) (com|pletion-|
|00001b60| 69 67 6e 6f 72 65 2d 63 | 61 73 65 20 74 29 29 20 |ignore-c|ase t)) |
|00001b70| 28 76 6d 2d 66 6f 6c 6c | 6f 77 2d 73 75 6d 6d 61 |(vm-foll|ow-summa|
|00001b80| 72 79 2d 63 75 72 73 6f | 72 29 20 28 76 6d 2d 73 |ry-curso|r) (vm-s|
|00001b90| 65 6c 65 63 74 2d 66 6f | 6c 64 65 72 2d 62 75 66 |elect-fo|lder-buf|
|00001ba0| 66 65 72 29 20 28 6c 69 | 73 74 20 28 76 6d 2d 72 |fer) (li|st (vm-r|
|00001bb0| 65 61 64 2d 73 74 72 69 | 6e 67 20 22 41 64 64 20 |ead-stri|ng "Add |
|00001bc0| 6c 61 62 65 6c 73 3a 20 | 22 20 28 76 6d 2d 6f 62 |labels: |" (vm-ob|
|00001bd0| 61 72 72 61 79 2d 74 6f | 2d 73 74 72 69 6e 67 2d |array-to|-string-|
|00001be0| 6c 69 73 74 20 76 6d 2d | 6c 61 62 65 6c 2d 6f 62 |list vm-|label-ob|
|00001bf0| 61 72 72 61 79 29 20 74 | 29 20 28 70 72 65 66 69 |array) t|) (prefi|
|00001c00| 78 2d 6e 75 6d 65 72 69 | 63 2d 76 61 6c 75 65 20 |x-numeri|c-value |
|00001c10| 63 75 72 72 65 6e 74 2d | 70 72 65 66 69 78 2d 61 |current-|prefix-a|
|00001c20| 72 67 29 29 29 5d 29 0a | 28 64 65 66 61 6c 69 61 |rg)))]).|(defalia|
|00001c30| 73 20 27 76 6d 2d 61 64 | 64 2d 65 78 69 73 74 69 |s 'vm-ad|d-existi|
|00001c40| 6e 67 2d 6d 65 73 73 61 | 67 65 2d 6c 61 62 65 6c |ng-messa|ge-label|
|00001c50| 73 20 23 5b 28 73 74 72 | 69 6e 67 20 63 6f 75 6e |s #[(str|ing coun|
|00001c60| 74 29 20 22 c0 20 88 09 | ab 8d c2 09 21 ac 85 c3 |t) ". ..|....!...|
|00001c70| c4 21 ab 83 09 71 88 c5 | 20 88 0e 06 ab 88 c7 c8 |.!...q..| .......|
|00001c80| 70 43 5c 22 88 aa 74 c9 | 20 88 ca 0e 0b 0e 0c cd |pC\"..t.| .......|
|00001c90| 23 89 1e 0e ad a1 cf d0 | 21 71 88 d1 20 88 d2 63 |#.......|!q.. ..c|
|00001ca0| 88 0e 0e ab 8f 0e 0e 40 | d3 b1 02 88 0e 0e 41 89 |.......@|......A.|
|00001cb0| 16 0e ac 71 d4 70 21 29 | 87 22 20 5b 76 6d 2d 66 |...q.p!)|." [vm-f|
|00001cc0| 6f 6c 6c 6f 77 2d 73 75 | 6d 6d 61 72 79 2d 63 75 |ollow-su|mmary-cu|
|00001cd0| 72 73 6f 72 20 76 6d 2d | 6d 61 69 6c 2d 62 75 66 |rsor vm-|mail-buf|
|00001ce0| 66 65 72 20 62 75 66 66 | 65 72 2d 6e 61 6d 65 20 |fer buff|er-name |
|00001cf0| 65 72 72 6f 72 20 22 46 | 6f 6c 64 65 72 20 62 75 |error "F|older bu|
|00001d00| 66 66 65 72 20 68 61 73 | 20 62 65 65 6e 20 6b 69 |ffer has| been ki|
|00001d10| 6c 6c 65 64 2e 22 20 76 | 6d 2d 63 68 65 63 6b 2d |lled." v|m-check-|
|00001d20| 66 6f 72 2d 6b 69 6c 6c | 65 64 2d 73 75 6d 6d 61 |for-kill|ed-summa|
|00001d30| 72 79 20 76 6d 2d 66 6f | 6c 64 65 72 2d 72 65 61 |ry vm-fo|lder-rea|
|00001d40| 64 2d 6f 6e 6c 79 20 73 | 69 67 6e 61 6c 20 66 6f |d-only s|ignal fo|
|00001d50| 6c 64 65 72 2d 72 65 61 | 64 2d 6f 6e 6c 79 20 76 |lder-rea|d-only v|
|00001d60| 6d 2d 65 72 72 6f 72 2d | 69 66 2d 66 6f 6c 64 65 |m-error-|if-folde|
|00001d70| 72 2d 65 6d 70 74 79 20 | 76 6d 2d 61 64 64 2d 6f |r-empty |vm-add-o|
|00001d80| 72 2d 64 65 6c 65 74 65 | 2d 6d 65 73 73 61 67 65 |r-delete|-message|
|00001d90| 2d 6c 61 62 65 6c 73 20 | 73 74 72 69 6e 67 20 63 |-labels |string c|
|00001da0| 6f 75 6e 74 20 65 78 69 | 73 74 69 6e 67 2d 6f 6e |ount exi|sting-on|
|00001db0| 6c 79 20 69 67 6e 6f 72 | 65 64 2d 6c 61 62 65 6c |ly ignor|ed-label|
|00001dc0| 73 20 67 65 74 2d 62 75 | 66 66 65 72 2d 63 72 65 |s get-bu|ffer-cre|
|00001dd0| 61 74 65 20 22 2a 49 67 | 6e 6f 72 65 64 20 4c 61 |ate "*Ig|nored La|
|00001de0| 62 65 6c 73 2a 22 20 65 | 72 61 73 65 2d 62 75 66 |bels*" e|rase-buf|
|00001df0| 66 65 72 20 22 54 68 65 | 73 65 20 6c 61 62 65 6c |fer "The|se label|
|00001e00| 73 20 64 6f 20 6e 6f 74 | 20 65 78 69 73 74 20 61 |s do not| exist a|
|00001e10| 6e 64 20 77 65 72 65 20 | 6e 6f 74 20 61 64 64 65 |nd were |not adde|
|00001e20| 64 3a 5c 6e 5c 6e 22 20 | 22 5c 6e 22 20 64 69 73 |d:\n\n" |"\n" dis|
|00001e30| 70 6c 61 79 2d 62 75 66 | 66 65 72 5d 20 35 20 22 |play-buf|fer] 5 "|
|00001e40| 5c 0a 41 74 74 61 63 68 | 20 73 6f 6d 65 20 61 6c |\.Attach| some al|
|00001e50| 72 65 61 64 79 20 65 78 | 69 73 74 69 6e 67 20 6c |ready ex|isting l|
|00001e60| 61 62 65 6c 73 20 74 6f | 20 61 20 6d 65 73 73 61 |abels to| a messa|
|00001e70| 67 65 2e 0a 4f 6e 6c 79 | 20 6c 61 62 65 6c 73 20 |ge..Only| labels |
|00001e80| 74 68 61 74 20 61 72 65 | 20 63 75 72 72 65 6e 74 |that are| current|
|00001e90| 6c 79 20 61 74 74 61 63 | 68 65 64 20 74 6f 20 73 |ly attac|hed to s|
|00001ea0| 6f 6d 65 20 6d 65 73 73 | 61 67 65 20 69 6e 20 74 |ome mess|age in t|
|00001eb0| 68 69 73 0a 66 6f 6c 64 | 65 72 20 6f 72 20 6c 61 |his.fold|er or la|
|00001ec0| 62 65 6c 73 20 74 68 61 | 74 20 68 61 76 65 20 70 |bels tha|t have p|
|00001ed0| 72 65 76 69 6f 75 73 6c | 79 20 62 65 65 6e 20 61 |reviousl|y been a|
|00001ee0| 74 74 61 63 68 65 64 20 | 74 6f 20 6d 65 73 73 61 |ttached |to messa|
|00001ef0| 67 65 73 0a 69 6e 20 74 | 68 69 73 20 66 6f 6c 64 |ges.in t|his fold|
|00001f00| 65 72 20 77 69 6c 6c 20 | 62 65 20 61 64 64 65 64 |er will |be added|
|00001f10| 2e 20 20 4f 74 68 65 72 | 20 6c 61 62 65 6c 73 20 |. Other| labels |
|00001f20| 77 69 6c 6c 20 62 65 20 | 73 69 6c 65 6e 74 6c 79 |will be |silently|
|00001f30| 0a 69 67 6e 6f 72 65 64 | 2e 0a 0a 54 68 65 73 65 |.ignored|...These|
|00001f40| 20 61 72 65 20 61 72 62 | 69 74 72 61 72 79 20 75 | are arb|itrary u|
|00001f50| 73 65 72 2d 64 65 66 69 | 6e 65 64 20 6c 61 62 65 |ser-defi|ned labe|
|00001f60| 6c 73 2c 20 6e 6f 74 20 | 74 6f 20 62 65 20 63 6f |ls, not |to be co|
|00001f70| 6e 66 75 73 65 64 20 77 | 69 74 68 0a 6d 65 73 73 |nfused w|ith.mess|
|00001f80| 61 67 65 20 61 74 74 72 | 69 62 75 74 65 73 20 6c |age attr|ibutes l|
|00001f90| 69 6b 65 20 60 6e 65 77 | 27 20 61 6e 64 20 60 64 |ike `new|' and `d|
|00001fa0| 65 6c 65 74 65 64 27 2e | 20 20 49 6e 74 65 72 61 |eleted'.| Intera|
|00001fb0| 63 74 69 76 65 6c 79 20 | 79 6f 75 0a 77 69 6c 6c |ctively |you.will|
|00001fc0| 20 62 65 20 70 72 6f 6d | 70 74 65 64 20 66 6f 72 | be prom|pted for|
|00001fd0| 20 74 68 65 20 6c 61 62 | 65 6c 73 20 74 6f 20 62 | the lab|els to b|
|00001fe0| 65 20 61 64 64 65 64 2e | 20 20 59 6f 75 20 63 61 |e added.| You ca|
|00001ff0| 6e 20 75 73 65 0a 63 6f | 6d 70 6c 65 74 69 6f 6e |n use.co|mpletion|
|00002000| 20 74 6f 20 65 78 70 61 | 6e 64 20 74 68 65 20 6c | to expa|nd the l|
|00002010| 61 62 65 6c 20 6e 61 6d | 65 73 2c 20 77 69 74 68 |abel nam|es, with|
|00002020| 20 74 68 65 20 63 6f 6d | 70 6c 65 74 69 6f 6e 20 | the com|pletion |
|00002030| 6c 69 73 74 0a 62 65 69 | 6e 67 20 61 6c 6c 20 74 |list.bei|ng all t|
|00002040| 68 65 20 6c 61 62 65 6c | 73 20 74 68 61 74 20 68 |he label|s that h|
|00002050| 61 76 65 20 65 76 65 72 | 20 62 65 65 6e 20 75 73 |ave ever| been us|
|00002060| 65 64 20 69 6e 20 74 68 | 69 73 20 66 6f 6c 64 65 |ed in th|is folde|
|00002070| 72 2e 0a 54 68 65 20 6e | 61 6d 65 73 20 73 68 6f |r..The n|ames sho|
|00002080| 75 6c 64 20 62 65 20 65 | 6e 74 65 72 65 64 20 61 |uld be e|ntered a|
|00002090| 73 20 61 20 73 70 61 63 | 65 20 73 65 70 61 72 61 |s a spac|e separa|
|000020a0| 74 65 64 20 6c 69 73 74 | 2e 20 20 4c 61 62 65 6c |ted list|. Label|
|000020b0| 0a 6e 61 6d 65 73 20 61 | 72 65 20 63 6f 6d 70 61 |.names a|re compa|
|000020c0| 72 65 64 20 63 61 73 65 | 2d 69 6e 73 65 6e 73 69 |red case|-insensi|
|000020d0| 74 69 76 65 6c 79 2e 0a | 0a 41 20 6e 75 6d 65 72 |tively..|.A numer|
|000020e0| 69 63 20 70 72 65 66 69 | 78 20 61 72 67 75 6d 65 |ic prefi|x argume|
|000020f0| 6e 74 20 43 4f 55 4e 54 | 20 63 61 75 73 65 73 20 |nt COUNT| causes |
|00002100| 74 68 65 20 63 75 72 72 | 65 6e 74 20 6d 65 73 73 |the curr|ent mess|
|00002110| 61 67 65 20 61 6e 64 0a | 74 68 65 20 6e 65 78 74 |age and.|the next|
|00002120| 20 43 4f 55 4e 54 2d 31 | 20 6d 65 73 73 61 67 65 | COUNT-1| message|
|00002130| 20 74 6f 20 68 61 76 65 | 20 74 68 65 20 6c 61 62 | to have| the lab|
|00002140| 65 6c 73 20 61 64 64 65 | 64 2e 20 20 41 0a 6e 65 |els adde|d. A.ne|
|00002150| 67 61 74 69 76 65 20 43 | 4f 55 4e 54 20 61 72 67 |gative C|OUNT arg|
|00002160| 20 63 61 75 73 65 73 20 | 74 68 65 20 63 75 72 72 | causes |the curr|
|00002170| 65 6e 74 20 6d 65 73 73 | 61 67 65 20 61 6e 64 20 |ent mess|age and |
|00002180| 74 68 65 20 70 72 65 76 | 69 6f 75 73 0a 43 4f 55 |the prev|ious.COU|
|00002190| 4e 54 2d 31 20 6d 65 73 | 73 61 67 65 73 20 74 6f |NT-1 mes|sages to|
|000021a0| 20 62 65 20 61 6c 74 65 | 72 65 64 2e 20 20 43 4f | be alte|red. CO|
|000021b0| 55 4e 54 20 64 65 66 61 | 75 6c 74 73 20 74 6f 20 |UNT defa|ults to |
|000021c0| 6f 6e 65 2e 22 20 28 6c | 65 74 20 28 28 6c 61 73 |one." (l|et ((las|
|000021d0| 74 2d 63 6f 6d 6d 61 6e | 64 20 6c 61 73 74 2d 63 |t-comman|d last-c|
|000021e0| 6f 6d 6d 61 6e 64 29 20 | 28 74 68 69 73 2d 63 6f |ommand) |(this-co|
|000021f0| 6d 6d 61 6e 64 20 74 68 | 69 73 2d 63 6f 6d 6d 61 |mmand th|is-comma|
|00002200| 6e 64 29 20 28 76 6d 2d | 63 6f 6d 70 6c 65 74 69 |nd) (vm-|completi|
|00002210| 6f 6e 2d 61 75 74 6f 2d | 63 6f 72 72 65 63 74 20 |on-auto-|correct |
|00002220| 6e 69 6c 29 20 28 63 6f | 6d 70 6c 65 74 69 6f 6e |nil) (co|mpletion|
|00002230| 2d 69 67 6e 6f 72 65 2d | 63 61 73 65 20 74 29 29 |-ignore-|case t))|
|00002240| 20 28 76 6d 2d 66 6f 6c | 6c 6f 77 2d 73 75 6d 6d | (vm-fol|low-summ|
|00002250| 61 72 79 2d 63 75 72 73 | 6f 72 29 20 28 76 6d 2d |ary-curs|or) (vm-|
|00002260| 73 65 6c 65 63 74 2d 66 | 6f 6c 64 65 72 2d 62 75 |select-f|older-bu|
|00002270| 66 66 65 72 29 20 28 6c | 69 73 74 20 28 76 6d 2d |ffer) (l|ist (vm-|
|00002280| 72 65 61 64 2d 73 74 72 | 69 6e 67 20 22 41 64 64 |read-str|ing "Add|
|00002290| 20 6c 61 62 65 6c 73 3a | 20 22 20 28 76 6d 2d 6f | labels:| " (vm-o|
|000022a0| 62 61 72 72 61 79 2d 74 | 6f 2d 73 74 72 69 6e 67 |barray-t|o-string|
|000022b0| 2d 6c 69 73 74 20 76 6d | 2d 6c 61 62 65 6c 2d 6f |-list vm|-label-o|
|000022c0| 62 61 72 72 61 79 29 20 | 74 29 20 28 70 72 65 66 |barray) |t) (pref|
|000022d0| 69 78 2d 6e 75 6d 65 72 | 69 63 2d 76 61 6c 75 65 |ix-numer|ic-value|
|000022e0| 20 63 75 72 72 65 6e 74 | 2d 70 72 65 66 69 78 2d | current|-prefix-|
|000022f0| 61 72 67 29 29 29 5d 29 | 0a 28 64 65 66 61 6c 69 |arg)))])|.(defali|
|00002300| 61 73 20 27 76 6d 2d 64 | 65 6c 65 74 65 2d 6d 65 |as 'vm-d|elete-me|
|00002310| 73 73 61 67 65 2d 6c 61 | 62 65 6c 73 20 23 5b 28 |ssage-la|bels #[(|
|00002320| 73 74 72 69 6e 67 20 63 | 6f 75 6e 74 29 20 22 c0 |string c|ount) ".|
|00002330| 20 88 09 ab 8d c2 09 21 | ac 85 c3 c4 21 ab 83 09 | ......!|....!...|
|00002340| 71 88 c5 20 88 0e 06 ab | 88 c7 c8 70 43 5c 22 88 |q.. ....|...pC\".|
|00002350| aa 74 c9 20 88 ca 0e 0b | 0e 0c cd 23 87 22 20 5b |.t. ....|...#." [|
|00002360| 76 6d 2d 66 6f 6c 6c 6f | 77 2d 73 75 6d 6d 61 72 |vm-follo|w-summar|
|00002370| 79 2d 63 75 72 73 6f 72 | 20 76 6d 2d 6d 61 69 6c |y-cursor| vm-mail|
|00002380| 2d 62 75 66 66 65 72 20 | 62 75 66 66 65 72 2d 6e |-buffer |buffer-n|
|00002390| 61 6d 65 20 65 72 72 6f | 72 20 22 46 6f 6c 64 65 |ame erro|r "Folde|
|000023a0| 72 20 62 75 66 66 65 72 | 20 68 61 73 20 62 65 65 |r buffer| has bee|
|000023b0| 6e 20 6b 69 6c 6c 65 64 | 2e 22 20 76 6d 2d 63 68 |n killed|." vm-ch|
|000023c0| 65 63 6b 2d 66 6f 72 2d | 6b 69 6c 6c 65 64 2d 73 |eck-for-|killed-s|
|000023d0| 75 6d 6d 61 72 79 20 76 | 6d 2d 66 6f 6c 64 65 72 |ummary v|m-folder|
|000023e0| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 73 69 67 6e 61 |-read-on|ly signa|
|000023f0| 6c 20 66 6f 6c 64 65 72 | 2d 72 65 61 64 2d 6f 6e |l folder|-read-on|
|00002400| 6c 79 20 76 6d 2d 65 72 | 72 6f 72 2d 69 66 2d 66 |ly vm-er|ror-if-f|
|00002410| 6f 6c 64 65 72 2d 65 6d | 70 74 79 20 76 6d 2d 61 |older-em|pty vm-a|
|00002420| 64 64 2d 6f 72 2d 64 65 | 6c 65 74 65 2d 6d 65 73 |dd-or-de|lete-mes|
|00002430| 73 61 67 65 2d 6c 61 62 | 65 6c 73 20 73 74 72 69 |sage-lab|els stri|
|00002440| 6e 67 20 63 6f 75 6e 74 | 20 6e 69 6c 5d 20 34 20 |ng count| nil] 4 |
|00002450| 22 5c 0a 44 65 6c 65 74 | 65 20 73 6f 6d 65 20 6c |"\.Delet|e some l|
|00002460| 61 62 65 6c 73 20 66 72 | 6f 6d 20 61 20 6d 65 73 |abels fr|om a mes|
|00002470| 73 61 67 65 2e 0a 54 68 | 65 73 65 20 61 72 65 20 |sage..Th|ese are |
|00002480| 61 72 62 69 74 72 61 72 | 79 20 75 73 65 72 2d 64 |arbitrar|y user-d|
|00002490| 65 66 69 6e 65 64 20 6c | 61 62 65 6c 73 2c 20 6e |efined l|abels, n|
|000024a0| 6f 74 20 74 6f 20 62 65 | 20 63 6f 6e 66 75 73 65 |ot to be| confuse|
|000024b0| 64 20 77 69 74 68 0a 6d | 65 73 73 61 67 65 20 61 |d with.m|essage a|
|000024c0| 74 74 72 69 62 75 74 65 | 73 20 6c 69 6b 65 20 60 |ttribute|s like `|
|000024d0| 6e 65 77 27 20 61 6e 64 | 20 60 64 65 6c 65 74 65 |new' and| `delete|
|000024e0| 64 27 2e 20 20 49 6e 74 | 65 72 61 63 74 69 76 65 |d'. Int|eractive|
|000024f0| 6c 79 20 79 6f 75 0a 77 | 69 6c 6c 20 62 65 20 70 |ly you.w|ill be p|
|00002500| 72 6f 6d 70 74 65 64 20 | 66 6f 72 20 74 68 65 20 |rompted |for the |
|00002510| 6c 61 62 65 6c 73 20 74 | 6f 20 62 65 20 64 65 6c |labels t|o be del|
|00002520| 65 74 65 64 2e 20 20 59 | 6f 75 20 63 61 6e 20 75 |eted. Y|ou can u|
|00002530| 73 65 0a 63 6f 6d 70 6c | 65 74 69 6f 6e 20 74 6f |se.compl|etion to|
|00002540| 20 65 78 70 61 6e 64 20 | 74 68 65 20 6c 61 62 65 | expand |the labe|
|00002550| 6c 20 6e 61 6d 65 73 2c | 20 77 69 74 68 20 74 68 |l names,| with th|
|00002560| 65 20 63 6f 6d 70 6c 65 | 74 69 6f 6e 20 6c 69 73 |e comple|tion lis|
|00002570| 74 0a 62 65 69 6e 67 20 | 61 6c 6c 20 74 68 65 20 |t.being |all the |
|00002580| 6c 61 62 65 6c 73 20 74 | 68 61 74 20 68 61 76 65 |labels t|hat have|
|00002590| 20 65 76 65 72 20 62 65 | 65 6e 20 75 73 65 64 20 | ever be|en used |
|000025a0| 69 6e 20 74 68 69 73 20 | 66 6f 6c 64 65 72 2e 0a |in this |folder..|
|000025b0| 54 68 65 20 6e 61 6d 65 | 73 20 73 68 6f 75 6c 64 |The name|s should|
|000025c0| 20 62 65 20 65 6e 74 65 | 72 65 64 20 61 73 20 61 | be ente|red as a|
|000025d0| 20 73 70 61 63 65 20 73 | 65 70 61 72 61 74 65 64 | space s|eparated|
|000025e0| 20 6c 69 73 74 2e 20 20 | 4c 61 62 65 6c 0a 6e 61 | list. |Label.na|
|000025f0| 6d 65 73 20 61 72 65 20 | 63 6f 6d 70 61 72 65 64 |mes are |compared|
|00002600| 20 63 61 73 65 2d 69 6e | 73 65 6e 73 69 74 69 76 | case-in|sensitiv|
|00002610| 65 6c 79 2e 0a 0a 41 20 | 6e 75 6d 65 72 69 63 20 |ely...A |numeric |
|00002620| 70 72 65 66 69 78 20 61 | 72 67 75 6d 65 6e 74 20 |prefix a|rgument |
|00002630| 43 4f 55 4e 54 20 63 61 | 75 73 65 73 20 74 68 65 |COUNT ca|uses the|
|00002640| 20 63 75 72 72 65 6e 74 | 20 6d 65 73 73 61 67 65 | current| message|
|00002650| 20 61 6e 64 0a 74 68 65 | 20 6e 65 78 74 20 43 4f | and.the| next CO|
|00002660| 55 4e 54 2d 31 20 6d 65 | 73 73 61 67 65 20 74 6f |UNT-1 me|ssage to|
|00002670| 20 68 61 76 65 20 74 68 | 65 20 6c 61 62 65 6c 73 | have th|e labels|
|00002680| 20 64 65 6c 65 74 65 64 | 2e 20 20 41 0a 6e 65 67 | deleted|. A.neg|
|00002690| 61 74 69 76 65 20 43 4f | 55 4e 54 20 61 72 67 20 |ative CO|UNT arg |
|000026a0| 63 61 75 73 65 73 20 74 | 68 65 20 63 75 72 72 65 |causes t|he curre|
|000026b0| 6e 74 20 6d 65 73 73 61 | 67 65 20 61 6e 64 20 74 |nt messa|ge and t|
|000026c0| 68 65 20 70 72 65 76 69 | 6f 75 73 0a 43 4f 55 4e |he previ|ous.COUN|
|000026d0| 54 2d 31 20 6d 65 73 73 | 61 67 65 73 20 74 6f 20 |T-1 mess|ages to |
|000026e0| 62 65 20 61 6c 74 65 72 | 65 64 2e 20 20 43 4f 55 |be alter|ed. COU|
|000026f0| 4e 54 20 64 65 66 61 75 | 6c 74 73 20 74 6f 20 6f |NT defau|lts to o|
|00002700| 6e 65 2e 22 20 28 6c 65 | 74 20 28 28 6c 61 73 74 |ne." (le|t ((last|
|00002710| 2d 63 6f 6d 6d 61 6e 64 | 20 6c 61 73 74 2d 63 6f |-command| last-co|
|00002720| 6d 6d 61 6e 64 29 20 28 | 74 68 69 73 2d 63 6f 6d |mmand) (|this-com|
|00002730| 6d 61 6e 64 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |mand thi|s-comman|
|00002740| 64 29 20 28 76 6d 2d 63 | 6f 6d 70 6c 65 74 69 6f |d) (vm-c|ompletio|
|00002750| 6e 2d 61 75 74 6f 2d 63 | 6f 72 72 65 63 74 20 6e |n-auto-c|orrect n|
|00002760| 69 6c 29 20 28 63 6f 6d | 70 6c 65 74 69 6f 6e 2d |il) (com|pletion-|
|00002770| 69 67 6e 6f 72 65 2d 63 | 61 73 65 20 74 29 29 20 |ignore-c|ase t)) |
|00002780| 28 76 6d 2d 66 6f 6c 6c | 6f 77 2d 73 75 6d 6d 61 |(vm-foll|ow-summa|
|00002790| 72 79 2d 63 75 72 73 6f | 72 29 20 28 76 6d 2d 73 |ry-curso|r) (vm-s|
|000027a0| 65 6c 65 63 74 2d 66 6f | 6c 64 65 72 2d 62 75 66 |elect-fo|lder-buf|
|000027b0| 66 65 72 29 20 28 6c 69 | 73 74 20 28 76 6d 2d 72 |fer) (li|st (vm-r|
|000027c0| 65 61 64 2d 73 74 72 69 | 6e 67 20 22 44 65 6c 65 |ead-stri|ng "Dele|
|000027d0| 74 65 20 6c 61 62 65 6c | 73 3a 20 22 20 28 76 6d |te label|s: " (vm|
|000027e0| 2d 6f 62 61 72 72 61 79 | 2d 74 6f 2d 73 74 72 69 |-obarray|-to-stri|
|000027f0| 6e 67 2d 6c 69 73 74 20 | 76 6d 2d 6c 61 62 65 6c |ng-list |vm-label|
|00002800| 2d 6f 62 61 72 72 61 79 | 29 20 74 29 20 28 70 72 |-obarray|) t) (pr|
|00002810| 65 66 69 78 2d 6e 75 6d | 65 72 69 63 2d 76 61 6c |efix-num|eric-val|
|00002820| 75 65 20 63 75 72 72 65 | 6e 74 2d 70 72 65 66 69 |ue curre|nt-prefi|
|00002830| 78 2d 61 72 67 29 29 29 | 5d 29 0a 28 64 65 66 61 |x-arg)))|]).(defa|
|00002840| 6c 69 61 73 20 27 76 6d | 2d 61 64 64 2d 6f 72 2d |lias 'vm|-add-or-|
|00002850| 64 65 6c 65 74 65 2d 6d | 65 73 73 61 67 65 2d 6c |delete-m|essage-l|
|00002860| 61 62 65 6c 73 20 23 5b | 28 73 74 72 69 6e 67 20 |abels #[|(string |
|00002870| 63 6f 75 6e 74 20 61 64 | 64 29 20 22 c0 c1 89 c2 |count ad|d) "....|
|00002880| 0b 43 24 88 0c 97 14 c5 | 0e 06 21 c7 0c c8 5c 22 |.C$.....|..!...\"|
|00002890| c1 89 1e 09 1e 5c 6e 1e | 0b 1e 0c 0e 0d ab c9 0e |.....\n.|........|
|000028a0| 0c ab c5 0e 0d ce 61 ab | 97 0e 0b 89 16 09 ab b8 |......a.|........|
|000028b0| cf 0e 09 40 0e 10 5c 22 | 88 0e 09 41 89 16 09 aa |...@..\"|...A....|
|000028c0| 6e c1 1e 11 0e 0b 89 16 | 09 ab 99 d2 0e 09 40 0e |n.......|......@.|
|000028d0| 10 5c 22 ab 88 0e 09 40 | 0e 11 42 16 11 0e 09 41 |.\"....@|..B....A|
|000028e0| 89 16 09 ac 67 0e 11 16 | 0b 29 0e 0c ab d6 0e 0b |....g...|.)......|
|000028f0| 16 09 d3 0e 0c 40 d4 48 | d5 48 21 16 5c 6e 0e 0d |.....@.H|.H!.\n..|
|00002900| ab 94 0e 09 ab a5 0e 09 | 40 0e 5c 6e 42 16 5c 6e |........|@.\nB.\n|
|00002910| 0e 09 41 89 16 09 aa 6e | 0e 09 ab 91 d6 0e 09 40 |..A....n|.......@|
|00002920| 0e 5c 6e 5c 22 16 5c 6e | 0e 09 41 89 16 09 ac 6f |.\n\".\n|..A....o|
|00002930| 0e 0d ab 86 d7 0e 5c 6e | 21 16 5c 6e d8 0e 0c 40 |......\n|!.\n...@|
|00002940| 0e 5c 6e 5c 22 88 0e 0c | 41 89 16 0c ac 2a 2c d9 |.\n\"...|A....*,.|
|00002950| 20 87 22 20 5b 76 6d 2d | 64 69 73 70 6c 61 79 20 | ." [vm-|display |
|00002960| 6e 69 6c 20 28 76 6d 2d | 61 64 64 2d 6d 65 73 73 |nil (vm-|add-mess|
|00002970| 61 67 65 2d 6c 61 62 65 | 6c 73 20 76 6d 2d 64 65 |age-labe|ls vm-de|
|00002980| 6c 65 74 65 2d 6d 65 73 | 73 61 67 65 2d 6c 61 62 |lete-mes|sage-lab|
|00002990| 65 6c 73 29 20 74 68 69 | 73 2d 63 6f 6d 6d 61 6e |els) thi|s-comman|
|000029a0| 64 20 73 74 72 69 6e 67 | 20 76 6d 2d 73 65 6c 65 |d string| vm-sele|
|000029b0| 63 74 2d 6d 61 72 6b 65 | 64 2d 6f 72 2d 70 72 65 |ct-marke|d-or-pre|
|000029c0| 66 69 78 65 64 2d 6d 65 | 73 73 61 67 65 73 20 63 |fixed-me|ssages c|
|000029d0| 6f 75 6e 74 20 76 6d 2d | 70 61 72 73 65 20 22 5b |ount vm-|parse "[|
|000029e0| 00 2d 20 2c 7f 2d ff 5d | 2a 5c 5c 28 5b 5e 00 2d |.- ,.-.]|*\\([^.-|
|000029f0| 20 2c 7f 2d ff 5d 2b 5c | 5c 29 5b 00 2d 20 2c 7f | ,.-.]+\|\)[.- ,.|
|00002a00| 2d ff 5d 2a 22 20 61 63 | 74 2d 6c 61 62 65 6c 73 |-.]*" ac|t-labels|
|00002a10| 20 6c 61 62 65 6c 73 20 | 61 63 74 69 6f 6e 2d 6c | labels |action-l|
|00002a20| 61 62 65 6c 73 20 6d 2d | 6c 69 73 74 20 61 64 64 |abels m-|list add|
|00002a30| 20 61 6c 6c 20 69 6e 74 | 65 72 6e 20 76 6d 2d 6c | all int|ern vm-l|
|00002a40| 61 62 65 6c 2d 6f 62 61 | 72 72 61 79 20 6e 65 77 |abel-oba|rray new|
|00002a50| 6c 69 73 74 20 69 6e 74 | 65 72 6e 2d 73 6f 66 74 |list int|ern-soft|
|00002a60| 20 63 6f 70 79 2d 73 65 | 71 75 65 6e 63 65 20 34 | copy-se|quence 4|
|00002a70| 20 33 20 76 6d 2d 64 65 | 6c 71 75 61 6c 20 76 6d | 3 vm-de|lqual vm|
|00002a80| 2d 64 65 6c 65 74 65 2d | 64 75 70 6c 69 63 61 74 |-delete-|duplicat|
|00002a90| 65 73 20 76 6d 2d 73 65 | 74 2d 6c 61 62 65 6c 73 |es vm-se|t-labels|
|00002aa0| 20 76 6d 2d 75 70 64 61 | 74 65 2d 73 75 6d 6d 61 | vm-upda|te-summa|
|00002ab0| 72 79 2d 61 6e 64 2d 6d | 6f 64 65 2d 6c 69 6e 65 |ry-and-m|ode-line|
|00002ac0| 5d 20 36 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 6]).(d|efalias |
|00002ad0| 27 76 6d 2d 73 65 74 2d | 78 78 78 78 2d 66 6c 61 |'vm-set-|xxxx-fla|
|00002ae0| 67 20 23 5b 28 6d 20 66 | 6c 61 67 20 6e 6f 72 65 |g #[(m f|lag nore|
|00002af0| 63 6f 72 64 20 66 75 6e | 63 74 69 6f 6e 20 61 74 |cord fun|ction at|
|00002b00| 74 72 2d 69 6e 64 65 78 | 29 20 22 c0 89 19 1a 0b |tr-index|) ".....|
|00002b10| 3f 85 ac 00 0c c5 48 c6 | 48 4a ab 93 8a 0c c6 48 |?.....H.|HJ.....H|
|00002b20| c7 48 4a c6 48 c8 48 71 | 88 0b 29 3f 85 ac 00 0e |.HJ.H.Hq|..)?....|
|00002b30| 09 ac e1 0c c6 48 c7 48 | 4a 0c c5 48 c6 48 4a 42 |.....H.H|J..H.HJB|
|00002b40| 89 11 ab 95 0c ca 48 09 | 40 ca 48 61 ab 85 09 40 |......H.|@.Ha...@|
|00002b50| 5c 6e 42 12 09 41 89 11 | ac 6b 5c 6e ac 84 0c 5c |\nB..A..|.k\n...\|
|00002b60| 6e 42 12 5c 6e ab b1 8a | 5c 6e 40 c6 48 c8 48 71 |nB.\n...|\n@.H.Hq|
|00002b70| 88 cb 20 ac 8a cc cd 21 | 88 ce cc c0 44 21 88 ce |.. ....!|....D!..|
|00002b80| 0e 0f 5c 6e 40 0e 10 3f | 45 21 88 d1 20 88 0e 12 |..\n@..?|E!.. ...|
|00002b90| 54 16 12 29 5c 6e 41 89 | 12 ac 4f 0c ca 48 0e 13 |T..)\nA.|..O..H..|
|00002ba0| 0e 10 49 88 d4 0c 21 88 | 0e 09 3f ad 91 0e 15 cd |..I...!.|..?.....|
|00002bb0| 61 ab 85 d6 0c 21 aa 86 | 0c c5 48 ca cd 49 2a 87 |a....!..|..H..I*.|
|00002bc0| 22 20 5b 6e 69 6c 20 76 | 6d 70 20 6d 2d 6c 69 73 |" [nil v|mp m-lis|
|00002bd0| 74 20 76 6d 2d 66 6f 6c | 64 65 72 2d 72 65 61 64 |t vm-fol|der-read|
|00002be0| 2d 6f 6e 6c 79 20 6d 20 | 34 20 31 20 35 20 39 20 |-only m |4 1 5 9 |
|00002bf0| 6e 6f 72 65 63 6f 72 64 | 20 32 20 62 75 66 66 65 |norecord| 2 buffe|
|00002c00| 72 2d 6d 6f 64 69 66 69 | 65 64 2d 70 20 76 6d 2d |r-modifi|ed-p vm-|
|00002c10| 73 65 74 2d 62 75 66 66 | 65 72 2d 6d 6f 64 69 66 |set-buff|er-modif|
|00002c20| 69 65 64 2d 70 20 74 20 | 76 6d 2d 75 6e 64 6f 2d |ied-p t |vm-undo-|
|00002c30| 72 65 63 6f 72 64 20 66 | 75 6e 63 74 69 6f 6e 20 |record f|unction |
|00002c40| 66 6c 61 67 20 76 6d 2d | 75 6e 64 6f 2d 62 6f 75 |flag vm-|undo-bou|
|00002c50| 6e 64 61 72 79 20 76 6d | 2d 6d 6f 64 69 66 69 63 |ndary vm|-modific|
|00002c60| 61 74 69 6f 6e 2d 63 6f | 75 6e 74 65 72 20 61 74 |ation-co|unter at|
|00002c70| 74 72 2d 69 6e 64 65 78 | 20 76 6d 2d 6d 61 72 6b |tr-index| vm-mark|
|00002c80| 2d 66 6f 72 2d 73 75 6d | 6d 61 72 79 2d 75 70 64 |-for-sum|mary-upd|
|00002c90| 61 74 65 20 76 6d 2d 66 | 6c 75 73 68 2d 69 6e 74 |ate vm-f|lush-int|
|00002ca0| 65 72 76 61 6c 20 76 6d | 2d 73 74 75 66 66 2d 76 |erval vm|-stuff-v|
|00002cb0| 69 72 74 75 61 6c 2d 61 | 74 74 72 69 62 75 74 65 |irtual-a|ttribute|
|00002cc0| 73 5d 20 35 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |s] 5]).(|defalias|
|00002cd0| 20 27 76 6d 2d 73 65 74 | 2d 6c 61 62 65 6c 73 20 | 'vm-set|-labels |
|00002ce0| 23 5b 28 6d 20 6c 61 62 | 65 6c 73 29 20 22 c0 09 |#[(m lab|els) "..|
|00002cf0| c2 48 c3 48 c0 1c 1d 1e | 06 0e 07 3f 85 b7 00 09 |.H.H....|...?....|
|00002d00| c2 48 c8 48 4a ab 94 8a | 09 c8 48 c9 48 4a c8 48 |.H.HJ...|..H.HJ.H|
|00002d10| ca 48 71 88 0e 07 29 3f | 85 b7 00 09 c8 48 c9 48 |.Hq...)?|.....H.H|
|00002d20| 4a 09 c2 48 c8 48 4a 42 | 89 14 ab 97 09 cb 48 0c |J..H.HJB|......H.|
|00002d30| 40 cb 48 61 ab 87 0c 40 | 0e 06 42 16 06 0c 41 89 |@.Ha...@|..B...A.|
|00002d40| 14 ac 69 0e 06 ac 86 09 | 0e 06 42 16 06 0e 06 ab |..i.....|..B.....|
|00002d50| b0 8a 0e 06 40 c8 48 ca | 48 71 88 cc 20 ac 8a cd |....@.H.|Hq.. ...|
|00002d60| ce 21 88 cf cd c0 44 21 | 88 cf d0 09 0d 45 21 88 |.!....D!|.....E!.|
|00002d70| d1 20 88 0e 12 54 16 12 | 29 0e 06 41 89 16 06 ac |. ...T..|)..A....|
|00002d80| 50 09 c2 48 c3 0e 13 49 | 88 09 c2 48 c2 c0 49 88 |P..H...I|...H..I.|
|00002d90| d4 09 21 88 0e 15 ce 61 | ab 85 d6 09 21 aa 86 09 |..!....a|....!...|
|00002da0| c2 48 cb ce 49 2b 87 22 | 20 5b 6e 69 6c 20 6d 20 |.H..I+."| [nil m |
|00002db0| 34 20 33 20 76 6d 70 20 | 6f 6c 64 2d 6c 61 62 65 |4 3 vmp |old-labe|
|00002dc0| 6c 73 20 6d 2d 6c 69 73 | 74 20 76 6d 2d 66 6f 6c |ls m-lis|t vm-fol|
|00002dd0| 64 65 72 2d 72 65 61 64 | 2d 6f 6e 6c 79 20 31 20 |der-read|-only 1 |
|00002de0| 35 20 39 20 32 20 62 75 | 66 66 65 72 2d 6d 6f 64 |5 9 2 bu|ffer-mod|
|00002df0| 69 66 69 65 64 2d 70 20 | 76 6d 2d 73 65 74 2d 62 |ified-p |vm-set-b|
|00002e00| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00002e10| 20 74 20 76 6d 2d 75 6e | 64 6f 2d 72 65 63 6f 72 | t vm-un|do-recor|
|00002e20| 64 20 76 6d 2d 73 65 74 | 2d 6c 61 62 65 6c 73 20 |d vm-set|-labels |
|00002e30| 76 6d 2d 75 6e 64 6f 2d | 62 6f 75 6e 64 61 72 79 |vm-undo-|boundary|
|00002e40| 20 76 6d 2d 6d 6f 64 69 | 66 69 63 61 74 69 6f 6e | vm-modi|fication|
|00002e50| 2d 63 6f 75 6e 74 65 72 | 20 6c 61 62 65 6c 73 20 |-counter| labels |
|00002e60| 76 6d 2d 6d 61 72 6b 2d | 66 6f 72 2d 73 75 6d 6d |vm-mark-|for-summ|
|00002e70| 61 72 79 2d 75 70 64 61 | 74 65 20 76 6d 2d 66 6c |ary-upda|te vm-fl|
|00002e80| 75 73 68 2d 69 6e 74 65 | 72 76 61 6c 20 76 6d 2d |ush-inte|rval vm-|
|00002e90| 73 74 75 66 66 2d 76 69 | 72 74 75 61 6c 2d 61 74 |stuff-vi|rtual-at|
|00002ea0| 74 72 69 62 75 74 65 73 | 5d 20 35 5d 29 0a 28 64 |tributes|] 5]).(d|
|00002eb0| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 74 2d |efalias |'vm-set-|
|00002ec0| 6e 65 77 2d 66 6c 61 67 | 20 23 5b 28 6d 20 66 6c |new-flag| #[(m fl|
|00002ed0| 61 67 20 26 6f 70 74 69 | 6f 6e 61 6c 20 6e 6f 72 |ag &opti|onal nor|
|00002ee0| 65 63 6f 72 64 29 20 22 | c0 09 5c 6e 0b c4 c5 25 |ecord) "|..\n...%|
|00002ef0| 87 22 20 5b 76 6d 2d 73 | 65 74 2d 78 78 78 78 2d |." [vm-s|et-xxxx-|
|00002f00| 66 6c 61 67 20 6d 20 66 | 6c 61 67 20 6e 6f 72 65 |flag m f|lag nore|
|00002f10| 63 6f 72 64 20 76 6d 2d | 73 65 74 2d 6e 65 77 2d |cord vm-|set-new-|
|00002f20| 66 6c 61 67 20 30 5d 20 | 36 5d 29 0a 28 64 65 66 |flag 0] |6]).(def|
|00002f30| 61 6c 69 61 73 20 27 76 | 6d 2d 73 65 74 2d 75 6e |alias 'v|m-set-un|
|00002f40| 72 65 61 64 2d 66 6c 61 | 67 20 23 5b 28 6d 20 66 |read-fla|g #[(m f|
|00002f50| 6c 61 67 20 26 6f 70 74 | 69 6f 6e 61 6c 20 6e 6f |lag &opt|ional no|
|00002f60| 72 65 63 6f 72 64 29 20 | 22 c0 09 5c 6e 0b c4 c5 |record) |"..\n...|
|00002f70| 25 87 22 20 5b 76 6d 2d | 73 65 74 2d 78 78 78 78 |%." [vm-|set-xxxx|
|00002f80| 2d 66 6c 61 67 20 6d 20 | 66 6c 61 67 20 6e 6f 72 |-flag m |flag nor|
|00002f90| 65 63 6f 72 64 20 76 6d | 2d 73 65 74 2d 75 6e 72 |ecord vm|-set-unr|
|00002fa0| 65 61 64 2d 66 6c 61 67 | 20 31 5d 20 36 5d 29 0a |ead-flag| 1] 6]).|
|00002fb0| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 73 65 |(defalia|s 'vm-se|
|00002fc0| 74 2d 64 65 6c 65 74 65 | 64 2d 66 6c 61 67 20 23 |t-delete|d-flag #|
|00002fd0| 5b 28 6d 20 66 6c 61 67 | 20 26 6f 70 74 69 6f 6e |[(m flag| &option|
|00002fe0| 61 6c 20 6e 6f 72 65 63 | 6f 72 64 29 20 22 c0 09 |al norec|ord) "..|
|00002ff0| 5c 6e 0b c4 c5 25 87 22 | 20 5b 76 6d 2d 73 65 74 |\n...%."| [vm-set|
|00003000| 2d 78 78 78 78 2d 66 6c | 61 67 20 6d 20 66 6c 61 |-xxxx-fl|ag m fla|
|00003010| 67 20 6e 6f 72 65 63 6f | 72 64 20 76 6d 2d 73 65 |g noreco|rd vm-se|
|00003020| 74 2d 64 65 6c 65 74 65 | 64 2d 66 6c 61 67 20 32 |t-delete|d-flag 2|
|00003030| 5d 20 36 5d 29 0a 28 64 | 65 66 61 6c 69 61 73 20 |] 6]).(d|efalias |
|00003040| 27 76 6d 2d 73 65 74 2d | 66 69 6c 65 64 2d 66 6c |'vm-set-|filed-fl|
|00003050| 61 67 20 23 5b 28 6d 20 | 66 6c 61 67 20 26 6f 70 |ag #[(m |flag &op|
|00003060| 74 69 6f 6e 61 6c 20 6e | 6f 72 65 63 6f 72 64 29 |tional n|orecord)|
|00003070| 20 22 c0 09 5c 6e 0b c4 | c5 25 87 22 20 5b 76 6d | "..\n..|.%." [vm|
|00003080| 2d 73 65 74 2d 78 78 78 | 78 2d 66 6c 61 67 20 6d |-set-xxx|x-flag m|
|00003090| 20 66 6c 61 67 20 6e 6f | 72 65 63 6f 72 64 20 76 | flag no|record v|
|000030a0| 6d 2d 73 65 74 2d 66 69 | 6c 65 64 2d 66 6c 61 67 |m-set-fi|led-flag|
|000030b0| 20 33 5d 20 36 5d 29 0a | 28 64 65 66 61 6c 69 61 | 3] 6]).|(defalia|
|000030c0| 73 20 27 76 6d 2d 73 65 | 74 2d 72 65 70 6c 69 65 |s 'vm-se|t-replie|
|000030d0| 64 2d 66 6c 61 67 20 23 | 5b 28 6d 20 66 6c 61 67 |d-flag #|[(m flag|
|000030e0| 20 26 6f 70 74 69 6f 6e | 61 6c 20 6e 6f 72 65 63 | &option|al norec|
|000030f0| 6f 72 64 29 20 22 c0 09 | 5c 6e 0b c4 c5 25 87 22 |ord) "..|\n...%."|
|00003100| 20 5b 76 6d 2d 73 65 74 | 2d 78 78 78 78 2d 66 6c | [vm-set|-xxxx-fl|
|00003110| 61 67 20 6d 20 66 6c 61 | 67 20 6e 6f 72 65 63 6f |ag m fla|g noreco|
|00003120| 72 64 20 76 6d 2d 73 65 | 74 2d 72 65 70 6c 69 65 |rd vm-se|t-replie|
|00003130| 64 2d 66 6c 61 67 20 34 | 5d 20 36 5d 29 0a 28 64 |d-flag 4|] 6]).(d|
|00003140| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 74 2d |efalias |'vm-set-|
|00003150| 77 72 69 74 74 65 6e 2d | 66 6c 61 67 20 23 5b 28 |written-|flag #[(|
|00003160| 6d 20 66 6c 61 67 20 26 | 6f 70 74 69 6f 6e 61 6c |m flag &|optional|
|00003170| 20 6e 6f 72 65 63 6f 72 | 64 29 20 22 c0 09 5c 6e | norecor|d) "..\n|
|00003180| 0b c4 c5 25 87 22 20 5b | 76 6d 2d 73 65 74 2d 78 |...%." [|vm-set-x|
|00003190| 78 78 78 2d 66 6c 61 67 | 20 6d 20 66 6c 61 67 20 |xxx-flag| m flag |
|000031a0| 6e 6f 72 65 63 6f 72 64 | 20 76 6d 2d 73 65 74 2d |norecord| vm-set-|
|000031b0| 77 72 69 74 74 65 6e 2d | 66 6c 61 67 20 35 5d 20 |written-|flag 5] |
|000031c0| 36 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |6]).(def|alias 'v|
|000031d0| 6d 2d 73 65 74 2d 66 6f | 72 77 61 72 64 65 64 2d |m-set-fo|rwarded-|
|000031e0| 66 6c 61 67 20 23 5b 28 | 6d 20 66 6c 61 67 20 26 |flag #[(|m flag &|
|000031f0| 6f 70 74 69 6f 6e 61 6c | 20 6e 6f 72 65 63 6f 72 |optional| norecor|
|00003200| 64 29 20 22 c0 09 5c 6e | 0b c4 c5 25 87 22 20 5b |d) "..\n|...%." [|
|00003210| 76 6d 2d 73 65 74 2d 78 | 78 78 78 2d 66 6c 61 67 |vm-set-x|xxx-flag|
|00003220| 20 6d 20 66 6c 61 67 20 | 6e 6f 72 65 63 6f 72 64 | m flag |norecord|
|00003230| 20 76 6d 2d 73 65 74 2d | 66 6f 72 77 61 72 64 65 | vm-set-|forwarde|
|00003240| 64 2d 66 6c 61 67 20 36 | 5d 20 36 5d 29 0a 28 64 |d-flag 6|] 6]).(d|
|00003250| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 74 2d |efalias |'vm-set-|
|00003260| 72 65 64 69 73 74 72 69 | 62 75 74 65 64 2d 66 6c |redistri|buted-fl|
|00003270| 61 67 20 23 5b 28 6d 20 | 66 6c 61 67 20 26 6f 70 |ag #[(m |flag &op|
|00003280| 74 69 6f 6e 61 6c 20 6e | 6f 72 65 63 6f 72 64 29 |tional n|orecord)|
|00003290| 20 22 c0 09 5c 6e 0b c4 | c5 25 87 22 20 5b 76 6d | "..\n..|.%." [vm|
|000032a0| 2d 73 65 74 2d 78 78 78 | 78 2d 66 6c 61 67 20 6d |-set-xxx|x-flag m|
|000032b0| 20 66 6c 61 67 20 6e 6f | 72 65 63 6f 72 64 20 76 | flag no|record v|
|000032c0| 6d 2d 73 65 74 2d 66 6f | 72 77 61 72 64 65 64 2d |m-set-fo|rwarded-|
|000032d0| 66 6c 61 67 20 38 5d 20 | 36 5d 29 0a 28 64 65 66 |flag 8] |6]).(def|
|000032e0| 61 6c 69 61 73 20 27 76 | 6d 2d 73 65 74 2d 6e 65 |alias 'v|m-set-ne|
|000032f0| 77 2d 66 6c 61 67 2d 6f | 66 20 23 5b 28 6d 20 66 |w-flag-o|f #[(m f|
|00003300| 6c 61 67 29 20 22 08 c1 | 48 c2 0b 49 87 22 20 5b |lag) "..|H..I." [|
|00003310| 6d 20 32 20 30 20 66 6c | 61 67 5d 20 33 5d 29 0a |m 2 0 fl|ag] 3]).|
|00003320| 28 64 65 66 61 6c 69 61 | 73 20 27 76 6d 2d 73 65 |(defalia|s 'vm-se|
|00003330| 74 2d 75 6e 72 65 61 64 | 2d 66 6c 61 67 2d 6f 66 |t-unread|-flag-of|
|00003340| 20 23 5b 28 6d 20 66 6c | 61 67 29 20 22 08 c1 48 | #[(m fl|ag) "..H|
|00003350| c2 0b 49 87 22 20 5b 6d | 20 32 20 31 20 66 6c 61 |..I." [m| 2 1 fla|
|00003360| 67 5d 20 33 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |g] 3]).(|defalias|
|00003370| 20 27 76 6d 2d 73 65 74 | 2d 64 65 6c 65 74 65 64 | 'vm-set|-deleted|
|00003380| 2d 66 6c 61 67 2d 6f 66 | 20 23 5b 28 6d 20 66 6c |-flag-of| #[(m fl|
|00003390| 61 67 29 20 22 08 c1 48 | c1 5c 6e 49 87 22 20 5b |ag) "..H|.\nI." [|
|000033a0| 6d 20 32 20 66 6c 61 67 | 5d 20 33 5d 29 0a 28 64 |m 2 flag|] 3]).(d|
|000033b0| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 74 2d |efalias |'vm-set-|
|000033c0| 66 69 6c 65 64 2d 66 6c | 61 67 2d 6f 66 20 23 5b |filed-fl|ag-of #[|
|000033d0| 28 6d 20 66 6c 61 67 29 | 20 22 08 c1 48 c2 0b 49 |(m flag)| "..H..I|
|000033e0| 87 22 20 5b 6d 20 32 20 | 33 20 66 6c 61 67 5d 20 |." [m 2 |3 flag] |
|000033f0| 33 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |3]).(def|alias 'v|
|00003400| 6d 2d 73 65 74 2d 72 65 | 70 6c 69 65 64 2d 66 6c |m-set-re|plied-fl|
|00003410| 61 67 2d 6f 66 20 23 5b | 28 6d 20 66 6c 61 67 29 |ag-of #[|(m flag)|
|00003420| 20 22 08 c1 48 c2 0b 49 | 87 22 20 5b 6d 20 32 20 | "..H..I|." [m 2 |
|00003430| 34 20 66 6c 61 67 5d 20 | 33 5d 29 0a 28 64 65 66 |4 flag] |3]).(def|
|00003440| 61 6c 69 61 73 20 27 76 | 6d 2d 73 65 74 2d 77 72 |alias 'v|m-set-wr|
|00003450| 69 74 74 65 6e 2d 66 6c | 61 67 2d 6f 66 20 23 5b |itten-fl|ag-of #[|
|00003460| 28 6d 20 66 6c 61 67 29 | 20 22 08 c1 48 c2 0b 49 |(m flag)| "..H..I|
|00003470| 87 22 20 5b 6d 20 32 20 | 35 20 66 6c 61 67 5d 20 |." [m 2 |5 flag] |
|00003480| 33 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 76 |3]).(def|alias 'v|
|00003490| 6d 2d 73 65 74 2d 66 6f | 72 77 61 72 64 65 64 2d |m-set-fo|rwarded-|
|000034a0| 66 6c 61 67 2d 6f 66 20 | 23 5b 28 6d 20 66 6c 61 |flag-of |#[(m fla|
|000034b0| 67 29 20 22 08 c1 48 c2 | 0b 49 87 22 20 5b 6d 20 |g) "..H.|.I." [m |
|000034c0| 32 20 36 20 66 6c 61 67 | 5d 20 33 5d 29 0a 28 64 |2 6 flag|] 3]).(d|
|000034d0| 65 66 61 6c 69 61 73 20 | 27 76 6d 2d 73 65 74 2d |efalias |'vm-set-|
|000034e0| 72 65 64 69 73 74 72 69 | 62 75 74 65 64 2d 66 6c |redistri|buted-fl|
|000034f0| 61 67 2d 6f 66 20 23 5b | 28 6d 20 66 6c 61 67 29 |ag-of #[|(m flag)|
|00003500| 20 22 08 c1 48 c2 0b 49 | 87 22 20 5b 6d 20 32 20 | "..H..I|." [m 2 |
|00003510| 38 20 66 6c 61 67 5d 20 | 33 5d 29 0a 28 64 65 66 |8 flag] |3]).(def|
|00003520| 61 6c 69 61 73 20 27 76 | 6d 2d 73 65 74 2d 64 65 |alias 'v|m-set-de|
|00003530| 6c 65 74 65 64 2d 66 6c | 61 67 2d 69 6e 2d 76 65 |leted-fl|ag-in-ve|
|00003540| 63 74 6f 72 20 23 5b 28 | 76 20 66 6c 61 67 29 20 |ctor #[(|v flag) |
|00003550| 22 08 c1 5c 6e 49 87 22 | 20 5b 76 20 32 20 66 6c |"..\nI."| [v 2 fl|
|00003560| 61 67 5d 20 33 5d 29 0a | 28 64 65 66 61 6c 69 61 |ag] 3]).|(defalia|
|00003570| 73 20 27 76 6d 2d 73 65 | 74 2d 6e 65 77 2d 66 6c |s 'vm-se|t-new-fl|
|00003580| 61 67 2d 69 6e 2d 76 65 | 63 74 6f 72 20 23 5b 28 |ag-in-ve|ctor #[(|
|00003590| 76 20 66 6c 61 67 29 20 | 22 08 c1 5c 6e 49 87 22 |v flag) |"..\nI."|
|000035a0| 20 5b 76 20 30 20 66 6c | 61 67 5d 20 33 5d 29 0a | [v 0 fl|ag] 3]).|
+--------+-------------------------+-------------------------+--------+--------+
